系统登录界面显示未找到方法和数据成员 是因为什么呢 谢谢了

Option Explicit
Const MaxTimes As Integer = 3
Public intMyTimes As Integer

Private Sub Form_Load()
    intMyTimes = 1
    cboUserName.Addltem " 管理员 "
    cboUserName.Addltem " 操作员1 "
    cboUserName.Addltem " 操作员2 "
End Sub
Private Sub Command1_Click()
      If cboUserName.Text <> " " Then
            If txtPassword.Text = " " Then
                MsgBox "请输入密码！"
                'txtPassword.SetFocus
            Else
               If txtPassword.Text <> "11" Then
                    If intMyTimes > MaxTimes Then
                        MsgBox "您无权使用该软件！"
                        End
                    Else
                        intMyTimes = intMyTimes + 1
                        MsgBox "密码不正确，请重新输入！"
                        'txtPassword.SetFocus
                    End If
                Else
                    MsgBox "登录成功！"
                End If
             End If
      Else
          MsgBox "操作员不能为空！"
          Exit Sub
      End If
End Sub
Private Sub Command2_Click()
     End
End Sub
是什么错误呢  刚学习VB  求指教