Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

ACCESS VBA 对 BOF和EOF 的属性判断

时间剧毒  发表于:2014-04-26 18:38:11  
复制

BOF 属性指示当前记录位置位于recordset 对象的第一个记录之前

EOF 指示当前记录位置位于recordset 对象的最后一个记录之后

什么意思 0.0 都第一个记录或最后一个了 怎么还有之前之后

属性为FALSE 或 true 的时候什么意思 求解   最好有例子

 

 

Top
cspa 发表于:2014-04-26 19:22:09

其实你可以简单地把BOF=TRUE理解为已到达记录集的头部,EOF=TRUE理解为已到达记录集尾部就可以了。

如果BOF=false,说明此条记录之前还有记录,如果EOF=false,说明此条记录之后还有记录。



时间剧毒 发表于:2014-04-26 20:14:38

谢谢你的解答 

 Do Until rec1.EOF = True
   tt = CS(DLookup("[品号状态]", "I-品号资料单头", "品号='" & rec1("品号") & "'"))
   If tt <> "1.正常" Then
      MsgBox ("此品号: " & rec1("品号") & " 已停用不能转进货单,请找相关人员查明原因!")
      Exit Sub
   End If

能帮我大概讲下 这段的意思么还有点不清晰   意思是 判断这个记录是  最后条记录??   记录为空??



cspa 发表于:2014-04-26 20:52:02


 Do Until rec1.EOF = True        '对rec1记录集中的记录做循环直到记录的尾部
   tt = CS(DLookup("[品号状态]", "I-品号资料单头", "品号='" & rec1("品号") & "'"))
   If tt <> "1.正常" Then
      MsgBox ("此品号: " & rec1("品号") & " 已停用不能转进货单,请找相关人员查明原因!")
      Exit Sub
   End If



这段代码的意思是对rec1记录集中的所有记录进行条件判断,当找到符合条件的记录时给出提示并退出循环。



总记录:3篇  页次:1/1 9 1 :