重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
你是说如何把密码框输入的内容变成类似“*”?
成都创新互联成立与2013年,先为宁津等服务建站,宁津等地企业,进行企业商务咨询服务。为宁津企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
在视图窗口,点击文本框,在右侧的属性栏里有一个属性是“passwordChar”
你给设置成想要的隐藏的字符就行,类似于“*”
希望能对你有帮助。
PRIVATE n AS integer
Private Sub Command6_Click()
If Text1.Text "admin" Then
MsgBox ("用户名不正确,程序退出!")
End
Else
Do While n = 3
If Text2.Text "admin" Then
Text2.Text = ""
MsgBox "密码不正确,请重新输入"
Text2.SetFocus
n = n + 1
exit sub
Else
MsgBox ("密码输入正确,欢迎登陆")
Exit Do
End
End If
Loop
End if
If n 3 Then
MsgBox ("密码输入三次均无效,程序退出")
End
End if
End Sub
1、首先,点击保存按钮后应检查文本框内容。
2其次,如果在文本框4中输入的值以400开头则保存反之更改为400。
3、最后,再次检查文本框5如果文本框5中的值为29或31则保存反之则更改即可。
先把RichTextBox1 的MultiLine属性设置成 True
有很多方法:
第一种 RichTextBox1.Text = "123456789" vbCrLf "555684"
第二种 RichTextBox1.Text = "123456789" vbNewLine "555684"
你要的是第二种
第一步,点击VS工具
请点击输入图片描述
第二步,打开后,新建一个Windows窗体应用程序
请点击输入图片描述
第三步,新建完毕后,如图所示
请点击输入图片描述
第四步,拖动文本框与按钮,如图示
请点击输入图片描述
第五步,将剪贴板复制与粘贴代码输入,如图示
请点击输入图片描述
第六步,运行程序
请点击输入图片描述
7
第七步,点击按钮,成功从剪贴板中复制与粘贴操作
请点击输入图片描述
以下代码添加到你需要触发的事件里:
1,把你的textbox的Multiline改成True(如果此处不修改你后面修改大小的时候只能修改width,而不能修改height),如果希望自动修改height,你的字体也要修改
2,添加这句代码(假设你要修改大小的textbox就是textbox1):
TextBox1.Location = New System.Drawing.Point(5, 20) '5, 20是你定义的针对窗体左上角点的X和Y位置
textbox1.size= New System.Drawing.Size(500, 600)‘500, 600是你自己定义的宽(width)和高(height)
3,或者直接写成:
TextBox1.Multiline = True’允许修改多行文本框
TextBox1.Location = New Point(5, 20) '5, 20是你定义的针对窗体左上角点的水平X和垂直Y位置
TextBox1.Size = New System.Drawing.Size(500, 600)‘500, 600是你自己定义的宽(width)和高(height)