[求助][em01]密码验证中,如何处理密码掩码，附源码！

田野

下面是我编的密码验证登录窗口,有这样的问题,把用户密码文本框的掩码设置"ASSWORD"时,用户密码.text=****,不再是用户实际输入的字符,该如何处理.
Private Sub 确定_Click()
   If IsNull([用户名]) Then
               MsgBox "请选择用户名", vbInformation, "提示信息"
          Else
                Me.Refresh
                   用户名.SetFocus
                       strtext1 = 用户名.text
                           intnum1 = 用户名.Column((0), (用户名.ListIndex))
        strtext2 = DLookup("[用户密码]", "tb用户密码表", "[用户ID]=" & intnum1)
                   用户密码.SetFocus
  End If
  If 用户密码.text = strtext2 Then
          DoCmd.Close
          DoCmd.OpenForm "w主界面窗体", acNormal, , , acFormReadOnly, acWindowNormal
          Else
          MsgBox "密码不对,请重新输入!", vbQuestion, "提示信息"
          用户密码.SetFocus
  End If
End Sub[em01]

make

显示的是****，保存的还是真正的密码

tmtony

不要使用TEXT属性。
请使用VALUE属性，此属性为文本框的缺省属性，举个例子，你的密码输入为333。
用 用户密码.text获得值是 ***  (且须先设置焦点到用户密码文本框）
用 用户密码.value 或直接用 用户密码 获得的是333, 即你所需的

田野

谢谢tmtony,问题已经解决.