学生信息管理系统之分析Eof和BOF

 一:首先来看这样的一个错误。我们在对班级进行修改的时候,也就是我们在没有班级记录的时候,点击修改记录,很容易就出现这样的错误。

             
                          

二:对错误包含知识点的认识:

        eof是一个函数,所以它有函数值,他的函数值是false和true,它的()中德1就是参数。它的含义是读取文件的指针到文件尾的时候它的值就是true,还没有读到文件尾,他的值为false,括号里面的参数是它判断的文件的文件号。这个函数使用的范围仅仅是读取顺序文件,do while not eof(1)解释判断当eof的值true时停止do循环,同样,这一语句在顺序文件的读取中经常用到。 同样的,eof也是一个函数,他的函数值也是true和false,他指示当前记录为与recordset对象的第一个记录之前。

       也就是说,使用bof和eof就是更好的确定recordset包含的记录,或者是从一个记录到另一个记录是否超过recordset对象的限制。

       如果当前记录位于第一个记录之前,bof属性将返回true(-1),  如果当前记录为第一个记录或者是位于其后侧将返回false(0)。

如果当前记录位于recordset对象的最后一个记录之后eof属性将返回true,而当前记录为recordset对象的最后一个记录或位于其前,将返回false。

如果eof或者是bof属性为true,则表示没有当前记录。

如果打开没有记录的recordset对象,bof和eof属性将设置为true,而recordset对象的count将设置为0,打开至少包含一条记录的recordset记录时候,第一条记录为当前记录,则eof和bof属性为false。
如果删除recordset对象中包含的最后记录,bof和eof的属性将设置为false,直到重新安排当前记录。

三:解决方法

只有添加了记录,点击修改才不会报错,也就是在源代码中有记录才会修改,没有记录点击修改整个程序就瘫痪了,该怎么办?

所以需要在代码中添加

if mrc.bof=true then
msgbox(请添加纪录)
exit sub
else
同样的道理,在我们的firstcommand事件中,由于没有判断是否为第一个记录,也很容易出现这样的错误,那么就可以写上如下的代码
Private Sub firstCommand_Click()
    mrc.MoveFirst
    If mrc.EOF = True Then
        MsgBox ("已经是第一条记录")
        Exit Sub
    End If
    Call viewData
End Sub

这样就可以更好的避免这样的错误了。 eof和bof在这个系统中始终贯穿,所以要更好的理解他们俩啊!


                           

                          
评论 11
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值