求助VB个问题

来源：百度知道 编辑：UC知道 时间：2024/06/14 08:14:42
设计一个系统的用户管理，这是以下代码。运行的时候会提示说“过程名与同名事件或过程描述不正确”能不能帮我找找原因？
Dim js As Boolean
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
r = Adodc1.Recordset.AbsolutePosition
Adodc1.Caption = "第" & Str(r) & "记录"
If Adodc1.Recordset.EOF Or Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveFirst
End If
If js = False Then
Call dispvalue
End If
End Sub

Private Sub Command1_Click()
Unload Me
End Sub

Sub dispvalue()
Text1.Text = Adodc1.Recordset.Fields("用户密码")
Text2.Text = Adodc1.Recordset.Fields("用户名")
Text3.Text = Adodc1.Recordset.Fields("用户类别")
End Sub
Sub setvalue()
Adodc1.Recordset.Fields("用户密码") = Text1.Text
Adodc1.Recordset.Fields("用户名") = Text2.Text
Adodc1.Recordset.Fields("

解决方法：
在“对象”下拉框选对象名称，在“事件”下拉框选事件，自动生成过程头部。
如果一些参数，在该过程不能获得而又必须使用，请声明窗体级变量，在有参数的过程中取得值，到没有的事件里使用。

你选择adodc1在事件那里下拉选MoveComplete让它自动生成那个头部的说明

应该可以的

应该是library没有引用吧.
你引用:Microsoft ActiveX Data Objects 2.5 Library试试.

无能为力,我还是菜鸟,学习中