VB 变量未定义 哪里错了啊?

来源:百度知道 编辑:UC知道 时间:2024/05/27 20:14:53
Public Sub showinfo()
Text1.Text = myrs.Fields(1)
Text2.Text = myrs.Fields(2)
Text3.Text = myrs.Fields(3)
Text4.Text = myrs.Fields(4)
lblInfo.Caption = "**现在共有" & myrs.RecordCount & _
"条记录,这个是第" & myrs.AbsolutePosition & "条**"
End Sub

补充一下,我是按着这个网页写的http://vb.sdqz.net/readteaching.php?autoid=31

不知道你是哪一句变量未定义:
请注意以下几点:

1、窗体必须有Text1控件
2、必须声明:
Dim mycn As New ADODB.Connection
Dim myrs As New ADODB.Recordset
3、必须一个label控件并更名为lblInfo