此程序中Text的属性栏PasswordChar属性设置为 *
Private Sub C1_Click()
If Text1.Text = “123456” Then
Text1.Text = “口令正确”
Text1.PasswordChar = “”
Else
Text2.Text = Text2.Text - 1
If Text2.Text > 0 Then
MsgBox “第” & (3 - Text2.Text) & “次口令错误,请重新输入”
Else
MsgBox “3次输入错误,请退出”
Text1.Enabled = False
End If
End If
End Sub
问题:此处Text1.PasswordChar = "“起到了什么作用?
解析:程序在运行的过程中,在口令框输入密码时,显示的是 * ,如果密码输入错误,Text文本框显示仍然为 * ,如果密码输入正确,Text文本框显示汉字:口令正确。如果程序中没有设定Text1.PasswordChar=”"的话,那么密码输入正确,Text文本框则显示 *,无法提示密码口令正确。
VB中基于Text1文本框的PasswordChar属性
最新推荐文章于 2022-04-02 09:58:12 发布