推 fumizuki:都已經是第一筆了幹麼還移到第一筆 03/30 06:39
推 fumizuki:都已經是最後一筆了幹麼還移到最後一筆@@ 03/30 06:40
http://0rz.net/fe1aw
請看圖，小弟做了 "第一筆"、"上一筆"、"下一筆"、"最末筆" 四個按鈕，
其中第一筆、最末筆這兩個按鈕 code 比較沒有問題，
只是在處理"上一筆"、"下一筆"遇到 BOF 或 EOF 時的情況，
偶有點卡彈... @ @
資料已在第一筆再按 "上一筆"，或是
資料在最後一筆再按 "下一筆" 時，都會出現那畫面。
希望大大可以指點一下。
=============================================
Private Sub Previous_Click()
If Adodc1.Recordset.BOF = True Then
MsgBox "資料已到第一筆！"
Adodc1.Recordset.MoveFirst
Else
Adodc1.Recordset.MovePrevious
... 以下省略
End If
End Sub
=============================================
Private Sub Next_Click()
If Adodc1.Recordset.EOF = True Then
MsgBox "資料已到第末筆！"
Adodc1.Recordset.MoveLast
Else
Adodc1.Recordset.MoveNext
... 以下省略
End If
End Sub
謝謝~ Orz (跪...)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.118.5.42