首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

vb 怎么做下一條記錄

2012-03-23 
vb 如何做下一條記錄我做了一個下一條記錄的按鈕, 點擊下一記錄按鈕移動至第二條記錄,再次安下一記錄按鈕

vb 如何做下一條記錄
我做了一個下一條記錄的按鈕, 點擊下一記錄按鈕移動至第二條記錄,再次安下一記錄按鈕無法移動第三條記錄

我的下一條記錄按鈕代碼:
Private Sub CmdNext_Click()
Dim i As Integer
AdodcMeterial.RecordSource = "select * from Meterialorderform where salesSlipNo='" + TxtSearch.Text + "'"
AdodcMeterial.Refresh
If Not AdodcMeterial.Recordset.EOF Then
Set rsme = AdodcMeterial.Recordset
rsme.MoveNext
顯示的數據賦給Textbox 
End If
End Sub

[解决办法]
用循环语句来实现,
[解决办法]
只需要 Refresh 以后的语句,前面的语句应该属于打开或刷新按钮。
[解决办法]
楼主你每次点击下一条的按钮都会重新查询一遍,那就肯定每次只能移动到第二条记录喽
[解决办法]

探讨
我做了一個下一條記錄的按鈕, 點擊下一記錄按鈕移動至第二條記錄,再次安下一記錄按鈕無法移動第三條記錄

我的下一條記錄按鈕代碼:
Private Sub CmdNext_Click()
Dim i As Integer
AdodcMeterial.RecordSource = "select * from Meterialorderform where salesSlipNo='" + ……

热点排行