作者pilimeow (7788的日子 > <)
站内Visual_Basic
标题Re: [VB6 ] 连资料库的问题
时间Thu Mar 30 19:48:28 2006
是偶想错了啦... 歹势。
偶意思是说如果一直按下一笔或上一笔,
按到最後一定会遇到 BOF 或 EOF,
偶只是要处理遇到这种情况时,
给使用者一个讯息:「资料已经到底...」之类的
偶语法应该写成这样:(以 "下一笔" 为例)
===============================================
Private Sub Next_Click()
With Adodc1
.recordset.MoveNext
'先移动
If .Recordset.EOF = True Then
MsgBox "资料已到最後一笔!"
.Recordset.MoveLast
Else
...(以下省略)
End If
End With
End Sub
================================================
酱应该没问题了吧 @ @?
※ 引述《pilimeow (7788的日子 > <)》之铭言:
http://0rz.net/fe1aw
资料已在第一笔再按 "上一笔",或是
资料在最後一笔再按 "下一笔" 时,都会出现那画面。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.118.5.42
1F:推 fumizuki:都已经是第一笔了干麽还移到第一笔 03/30 06:39
2F:推 fumizuki:都已经是最後一笔了干麽还移到最後一笔@@ 03/30 06:40
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.118.5.42
3F:推 sueadolph:.Recordset.MoveLast 这行没必要= ="" 前面有板有回了 03/31 02:38