vb中有关PasswordChar属性的问题

passwordchar：密码掩码，无论输入什么内容，都显示你设置的字符。

例如你在passwordchar输入“*”，那么程序运行后你在文本框中输入的所有内容都显示为“*”。

text就是普通文本的意思，就是你输入的内容。

在VB中，两者是独立的属性，两者之间没有什么必然的联系。

你这是了passwordchar后，只是显示的结果不同，但文本框的text值还是你输入的值，并不会因为passwordchar值得改变而改变。

passwordchar值一般用在密码框中，当一个文本框并定义为密码输入框的时候，就因该给其设置passwordchar属性，防止密码的泄露。

...

vb中用于表示密码输入的语句是？

以下登录界面Dim t As Integer, s As IntegerPrivate Sub Form_Load()t = 0s = 10Timer1.Interval = 1000Timer1.Enabled = FalseEnd SubPrivate Sub Command1_Click（) '确定按钮Timer1.Enabled = Falses = 10If Text1.Text ＂经理＂ Or Text2.Text ＂12345＂ Thent = t + 1If t = 3 ThenMsgBox ＂你无权使用本系统＂， ， ＂帐号错误＂ElseMsgBox ＂帐号错误，再试一次＂， ， ＂帐号错误＂End IfElseForm2.ShowUnload MeEnd IfEnd SubPrivate Sub Command2_Click（) '退出按钮EndEnd SubPrivate Sub Timer1_Timer（) '计时器s = s - 1If s = 0 ThenTimer1.Enabled = FalseMsgBox ＂你无权使用本系统＂， ， ＂帐号错误＂Unload MeEnd IfEnd SubPrivate Sub Text_GotFocus()Timer1.Enabled = TrueEnd Sub'''''''以下Form2窗体Private Sub Command1_Click（) '返回按钮Form1.ShowUnload MeEnd Sub

vb编怎样使Text1中输入的所有字符,都以*显示

程序不会在你的text1.setfocus处停止的，会继续运行直到do循环结束改成这样：dim n as integerPrivate Sub Command1_Click()If Text1.Text = ＂Open＂ ThenMsgBox（＂口令正确＂， vbOKOnly）EndElsen = n + 1MsgBox（＂密码错误，单击'确定'＂， vbOKOnly）if n=3 thenn=0endend iftext1.text=＂＂text1.setfocusend if 整个程序中X是没用的，你判断X=1是错误的，VBOKONLY的值不是1，所以你输入正确的密码了，但是X不等于1，你判断的却是X的值，所以密码正确也没用

转载请注明出处51数据库 » vbpasswordchar