vbpasswordchar fontitalic是什么意思
发布日期:2020-09-03摘要:vb中有关PasswordChar属性的问题passwordchar:密码掩码,无论输入什么内容,都显示你设置的字符。例如你在passwordchar输入“*”,那么程序运行后你在文本框中输入的所有内...
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的值,所以密码正确也没用
-
给我们打电话
7*24小时服务热线:1399999999
全国客服热线:400-0000-000 -
百度地图
福建省三明市 -
给我们发邮件
E-mail:[email protected]
在线沟通