Public txtpassword As Integer
If txtpassword.Text <> "11" Then
If txtpassword.Text = "" Then
典型的 类型错了。
应该改为:
Public txtpassword As label
另外,改成
Public txtpassword As String 也没有text属性的。
txtpassword 是不是这个变量的类型错了
If txtpassword.Text <> "11" Then或者是这句你写错了
从你程序上看 是类型错了 改成字符型试试
MsgBox "请输入密码", , "提示窗口"
如楼上 还有这个也错了