移动记录出错?
Private Sub cmdPre_Click()
If Adodc1.Recordset.BOF = True Then
Adodc1.Recordset.MoveFirst
Call init_text‘初始化文本框
Else
Adodc1.Recordset.MovePrevious
Call init_text
End If
End Sub
各位大哥,帮帮我,我是初学者不懂这么多啊。
问题点数:20、回复次数:2Top
1 楼Athickhead(穿着三角裤到处跑不叫裸奔)回复于 2005-08-01 10:03:45 得分 20
If Adodc1.Recordset.BOF = True Then
Adodc1.Recordset.MoveFirst
Call init_text‘初始化文本框
Else
Adodc1.Recordset.MoveNext
Call init_text
End If
End Sub
Top
2 楼gxzys(阿玉)回复于 2005-08-01 10:12:38 得分 0
'-----------------上一个--------------------
Private Sub cmdPre_Click()
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF = True Then
Adodc1.Recordset.MoveFirst
End If
Call init_text
End Sub
呵呵,这样就对了。Top




