If Not (rstWageBusiness.BOF And rstWageBusiness.EOF) Then
    If state <> "锁定" Then
       state = "锁定"
'    Select Case MsgBox("商务代表工资表修改完成了吗?是否要锁定", vbYesNoCancel + vbQuestion, "系统提示:")
'        Case Is = vbNo
'              Set rstWageBusiness = Nothing
'        Case Is = vbYes
             Set rstWageBusiness = Nothing
             FillRecordset "update tb_wageBusiness set ExtendDate='" & Date & "' ,state ='锁定' where Wagemonth='" & strDate & "'", rstWageBusiness
             Cancel = 0
上面什么意思,bof  eof  

解决方案 »

  1.   

    BOF 指当前记录位置位于 Recordset 对象的第一个记录之前。
    EOF 指当前记录位置位于 Recordset 对象的最后一个记录之后。通俗的说是记录集到了最前或最后,没有数据
      

  2.   

    转自http://zhidao.baidu.com/question/4963644.html?fr=qrlBOF 指示当前记录位置位于 Recordset 对象的第一个记录之前。 EOF 指示当前记录位置位于 Recordset 对象的最后一个记录之后。 
    返回值 BOF 和 EOF 属性返回布尔型值。 说明 使用 BOF 和 EOF 属性可确定 Recordset 对象是否包含记录,或者从一个记录移动到另一个记录时是否超出 Recordset 对象的限制。 如果当前记录位于第一个记录之前,BOF 属性将返回 True (-1),如果当前记录为第一个记录或位于其后则将返回 False (0)。 如果当前记录位于 Recordset 对象的最后一个记录之后 EOF 属性将返回 True,而当前记录为 Recordset 对象的最后一个记录或位于其前,则将返回 False。 如果 BOF 或 EOF 属性为 True,则没有当前记录。 如果打开没有记录的 Recordset 对象,BOF 和 EOF 属性将设置为 True,而 Recordset 对象的 RecordCount 属性设置为零。打开至少包含一条记录的 Recordset 对象时,第一条记录为当前记录,而 BOF 和 EOF 属性为 False。 如果删除 Recordset 对象中保留的最后记录,BOF 和 EOF 属性将保持 False,直到重新安排当前记录。
      

  3.   

    Not (rstWageBusiness.BOF And rstWageBusiness.EOF)   这样是有记录还是没??
      

  4.   

    not,and都是逻辑运算符
    not 逻辑非
    and 逻辑与 BOF 和 EOF 属性返回布尔型值如果 rstWageBusiness.BOF And rstWageBusiness.EOF 为true
    则 Not (rstWageBusiness.BOF And rstWageBusiness.EOF) 为false
    反之亦然
      

  5.   

    BOF =》BEGING OF FILE
    EOF =》END OF FILE
      

  6.   

    真的建议这样的求助帖子,不要发,因为答案就在MSDN里,是可以查到的。这样的问题也要拿出来问,是不可能做好编程的。