mdsk.net
当前位置:首页 >> 如何在VB中用 * 替代文本框中输入的密码,就是在文... >>

如何在VB中用 * 替代文本框中输入的密码,就是在文...

PasswordChar 属性 返回或设置一个值,该值指示所键入的字符或占位符在 TextBox 控件中是否要显示出来;返回或设置用作占位符。 语法 object.PasswordChar [= value] PasswordChar 属性的语法包含下面部分: 部分 描述 Object 对象表达式,其值...

在文本框的passwordchar属性里改为*就可以了

1、选中要设置的控件 2、按F4调出它的属性框 3、在其属性里面有个“PasswordChar" 4、将其后面空中输入"*"就可以了。

text1.passwordchar = "*" sub command1_click() label1.caption =text1.text end sub 这是让标签显示你输入的密码明文。是这意思么,不是还可以 sub command1_click() label1.caption = string("*",len(text1.text)) end sub 文本框里有几个*号...

VB6.0可设置文本框的PasswordChar 属性为*号字符,就能达到目的。 PasswordChar 属性,返回或设置一个值,该值指示所键入的字符或占位符在 TextBox 控件中是否要显示出来;返回或设置用作占位符。 PasswordChar 属性示例 本例说明 PasswordChar ...

'2个窗体(form1,form2) 2个textbox(text1,text2) 1个commandbutton (command1) 'text1 为账号框,text2为密码框,command1为登录按钮 Dim cCount As Long Private Sub Command1_Click() If LCase(Text1.Text) = "abc" And Text2.Text = "123" Then...

VB中文本框有一个属性叫Password,设置为"*"(通常做法)后,则输入任何内容都会显示成"*",这样可以很好的起到保密的作用。

Private Sub Form_Load() Text1.MaxLength = 6 '文本最大长度6 End Sub Private Sub Text1_Change() If Len(Text1.Text) = 6 And IsNumeric(Text1.Text) Then '文本长度为6,并且是数字时 Command1.Enabled = True Else Command1.Enabled = Fals...

这个就是相当于设置密码那个吧, 最长输入6个字符

有专门的函数:isnumeric() 例如: Private Sub Command1_Click() If Not IsNumeric(Text1.Text) Then mshbox "不是数字!" End If End Sub

网站首页 | 网站地图
All rights reserved Powered by www.mdsk.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com