VB.NET如何使用文本框
这篇文章主要为大家展示了“VB.NET如何使用文本框”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“VB.NET如何使用文本框”这篇文章吧。
成都创新互联公司专注为客户提供全方位的互联网综合服务,包含不限于成都网站设计、做网站、贵池网络推广、小程序制作、贵池网络营销、贵池企业策划、贵池品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;成都创新互联公司为所有大学生创业者提供贵池建站搭建服务,24小时服务热线:18982081108,官方网址:www.cdcxhl.com
VB.NET文本框1、设置只读文本框
有些时候在窗口显示一段信息,但又不希望用户去改变它,怎样实现文本的只读呢?首先,我们可以利用标签框(label)的只读属性,以标签来代替文本框以实现只读属性,但也可以用小程序实现真正的文本框的只读。
Sub Text1_KeyPress
(keyascii As Integer)keyascii = 0
End Sub
或者也可以用sendkey方法使文本框失去焦点,如以下程序:
Sub Text1_KeyDown
(KeyCode As Integer,
Shift As Integer)SendKeys "{tab}"
End Sub
或者直接设置控件的属性来实现,具体操作如下:
设置Text1.Enabled=True,这样设置后Text1无法获得焦点
设置Text1.Locked=True,这样设置后Text1可以获得焦点
VB.NET文本框2、限定文本框的输入内容和格式
以下程序可以实现限定文本框只能输入数字:
Private Sub Text1_KeyPress
(KeyAscii As Integer)If KeyAscii < Asc(0) Or
KeyAscii > Asc(9) ThenKeyAscii = 0
MsgBox "请输入数字"
End If
End Sub
若想限定文本框输入格式,可以使用VB的FORMAT函数,也可以使用专业版的屏蔽控件(Masked Edit),通过设定屏蔽控件的Mask属性可以对文本框的输入格式作精确控制。
VB.NET文件名排序轻松掌握
VB.NET List实用技巧详解
VB.NET指针在实际应用中作用体现
VB.NET水晶报表优点及结果描述
轻松打造VB.NET文件合并示例
VB.NET文本框3、为TextBox创建快捷键
VB规定,添加在窗体上的控件均在其Tabindex属性中记载其加载顺序,程序运行时焦点按Tabindex属性规定的顺序在控件间跳转。而为了简化操作,可VB中为任何具有caption的属性的控制创建快捷键,这通过caption属性中在想作为快捷键的字母前加&号实现。但有一个问题值得注意,而类似文本框这样的控件无caption这样的属性,这时可将标签与文本框同时使用。为lable创建快捷键,标签Tabindex属性设置比文本框小1,又因为label不能接收按点,焦点会自动跳至文本框。这相当于为文本框创建了快捷键。具体步骤如下:
(1)首先绘制标签,再绘制文本框。或随意绘制各种控制,将标签Tabindex属性设置比文本框小1
(2)在标签的caption属性中使用“&”号设定快捷键。这样就相当于为文本框设定了快捷键,当你按下标签框的快捷键时,焦点就会跳至文本框上。
VB.NET文本框4、在设计时实现文本框换行
对于文本框,在设计属性窗口不能输入换行符,但可以再程序执行时用代码来换行,即使用ASCII字符的13和10,如下列小程序就可将两行文本放入文本框:
Sub form_load( )
NL=chr(13)+chr(10)
text1.text=“my name
is”& NL &“liu qiang”End sub
VB.NET文本框5、创建口令文本框
创建口令文本框可用设置属性的方法,也可以通过调用WINDOWS的API应用函数接口来实现。首先,文本框的属性Passwordchar和maxlength可用来设置口令框。其中Passwordchar指定文本框显示的字符,如指定“*”,则在文本框内显示“*”,Maxlength确定文本框中能输入几个字符。超过Maxlength以后,文本框发出警告声,不能接收更多的字符。若使用WINDOWS应用函数接口,可用GetWindowLong、SetWindowsLong和SendMessage等接口函数来实现。
以上是“VB.NET如何使用文本框”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!
网页名称:VB.NET如何使用文本框
文章位置:http://myzitong.com/article/gihjsj.html