登录界面设计时出现的报错“未找到方法或数据成员” 求高手帮忙！！！！
代码如下：Private Sub cmdlogin_click() '这里提示错误！！！
On Error GoTo err_cmdlogin_click
Dim rs As New ADODB.Recordset
Dim str As String
Dim num As Integer
str = "select count(ID)from Person where ID='" & Me.username.Text
str = str & "'and Password='" & Me.password.Text & ""
Set rs = getrs(str)
num = rs(0)
If IsNull(Me.username) Then
MsgBox ("请输入用户名称!")
ElseIf IsNull(Me.password) Then
MsgBox ("请输入用户密码!")
ElseIf num <> 1 Then
MsgBox ("用户名或密码不正确，请重新输入!")
Else
Me.Visible = fales
loginflag = True
MDIForm1.Show
End If
exit_cmdlogin_click:
Exit Sub
err_cmdlogin_click:
MsgBox (Err.Description)
Resume exit_cmdlogin_click
End Sub
有高手帮忙看下 非常感谢！！！！ 双击 那个按钮 把代码拷进去 你的窗体上必须有个按钮叫cmdlogin cmdlogin_click
首先要有command控件 有command控件的 ！！他也报错 选中command控件，在右边的属性中把name属性的值改为cmdlogin 在设计界面上双击这个 Command 控件，然后把代码（除第一句和最后一句）剪切到出现的代码空间中。最后把剩下的两句删除。
删除按钮：cmdlogin
重建后，拷代码
把代码重新拷过，command控件也重新建过，但是还有错误 报错的确切地方根本不是cmdlogin_click()那里,过程里面有错的话那个执行亮线会在过程名处,但错误本身在过程里面.里面究竟是哪里出现阴影语句? 谢谢各位啦！！
问题以解决！！
原因是：label1控件的没有命名为usermane
label2控件没有命名为password 解决了就应该给分结帖
补充：VB , 基础类
