UC知道在做VB程序时，总是提示过程声明与同名事件或过程的描述不匹配
来源：百度知道 编辑：UC知道 时间：2024/05/23 00:18:51
Private Sub StuADO_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)（总是提示这句什么过程声明或过程的描述不匹配的）
If Not pRecordset.EOF And Not pRecordset.BOF Then
StuXH.Text = pRecordset("XH")
StuXM.Text = pRecordset("XM")
StuCSSJ.Text = pRecordset("CSSJ")
StuZY.Text = pRecordset("ZY")
StuZXF.Text = pRecordset("ZXF")
StuBZ.Text = CStr(pRecordset("BZ") & "")
If pRecordset("XB") = 0 Then
StuXBF.Value = True
Else
StuXBM.Value = True
End If
End If
End Sub
If Not pRecordset.EOF And Not pRecordset.BOF Then
StuXH.Text = pRecordset("XH")
StuXM.Text = pRecordset("XM")
StuCSSJ.Text = pRecordset("CSSJ")
StuZY.Text = pRecordset("ZY")
StuZXF.Text = pRecordset("ZXF")
StuBZ.Text = CStr(pRecordset("BZ") & "")
If pRecordset("XB") = 0 Then
StuXBF.Value = True
Else
StuXBM.Value = True
End If
End If
End Sub
这个问题时这样产生的：
你的有问题的这一行（过程头部）是自己写上的，不是使用vb编程环境产生的。
vb对各种控件的事件有规定，不能自己随意“创造”事件（要创造也可以，在类模块里面做，很麻烦的，就不说了），自己创造事件，就在事件头部出错。
同样，每种控件的不同事件其参数种类、多少也都是指定的。不能随意增加或减少，也不能更改参数类型。
你的问题就是出在这里！
解决方法：
在“对象”下拉框选对象名称，在“事件”下拉框选事件，自动生成过程头部。
如果一些参数，在该过程不能获得而又必须使用，请声明窗体级变量，在有参数的过程中取得值，到没有的事件里使用。
例如要在窗体的单击事件里使用鼠标位置，但这个事件没有这个参数，你不能自己写进去（写进去，就出现你这样的错误）
你可以在窗体开头声明x0、y0位单精度变量，再在窗体的鼠标移动事件里（那里有鼠标位置参数），把位置计入x0、y0
这样，在窗体的单击事件里就可以直接引用鼠标位置x0、y0
其实，这些问题我都遇到过，不一定就是程序问题的，你上网找下visual basic 6.0 service pack 6补丁就可以解决问题的。