VB.NET文本框处理实际应用解读
创始人
2024-06-21 06:01:32
0

VB.NET编程语言对于文本文件的的操作是一个比较重要的应用技巧,在实际程序开发中经常会遇到。我们在这里为大家介绍的VB.NET文本框处理相关方法,相信可以帮助大家初步掌握处理文本文件的相关方法。

在Visual Basic中,文本框(TextBox)是最常用的控件,熟练运用文本框是开发出高质量的应用程序的基础。笔者在从事应用程序开发中,摸索出有关文本框的应用技巧,写出来与VB爱好者共享。

VB.NET文本框处理1、设置只读文本框

有些时候在窗口显示一段信息,但又不希望用户去改变它,怎样实现文本的只读呢?首先,我们可以利用标签框(label)的只读属性,以标签来代替文本框以实现只读属性,但也可以用小程序实现真正的文本框的只读。

 

  1. Sub Text1_KeyPress 
    (keyascii As Integer)  
  2. keyascii = 0 
  3. End Sub 

 

或者也可以用sendkey方法使文本框失去焦点,如以下程序:

 

  1. Sub Text1_KeyDown 
    (KeyCode As Integer, 
    Shift As Integer)  
  2. SendKeys "{tab}"  
  3. End Sub 

 

或者直接设置控件的属性来实现,具体操作如下:

设置Text1.Enabled=True,这样设置后Text1无法获得焦点

设置Text1.Locked=True,这样设置后Text1可以获得焦点

VB.NET文本框处理2、限定文本框的输入内容和格式

以下程序可以实现限定文本框只能输入数字:

 

  1. Private Sub Text1_KeyPress
    (KeyAscii As Integer)   
  2. If KeyAscii < Asc(0) Or 
    KeyAscii > Asc(9) Then   
  3. KeyAscii = 0   
  4. MsgBox "请输入数字"   
  5. End If   
  6. End Sub 

若想限定文本框输入格式,可以使用VB的FORMAT函数,也可以使用专业版的屏蔽控件(Masked Edit),通过设定屏蔽控件的Mask属性可以对文本框的输入格式作精确控制。#t#

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,如下列小程序就可将两行文本放入文本框:

 

  1. Sub form_load( )  
  2. NL=chr(13)+chr(10)  
  3. text1.text=“my name 
    is”& NL &“liu qiang”  
  4. End sub 

 

VB.NET文本框处理5、创建口令文本框

创建口令文本框可用设置属性的方法,也可以通过调用WINDOWS的API应用函数接口来实现。首先,文本框的属性Passwordchar和maxlength可用来设置口令框。其中Passwordchar指定文本框显示的字符,如指定“*”,则在文本框内显示“*”,Maxlength确定文本框中能输入几个字符。超过Maxlength以后,文本框发出警告声,不能接收更多的字符。若使用WINDOWS应用函数接口,可用GetWindowLong、SetWindowsLong和SendMessage等接口函数来实现,有兴趣的读者可查阅Windows API函数手册或VB的联机帮助文件,这里就不一一赘述了。

相关内容

热门资讯

如何允许远程连接到MySQL数... [[277004]]【51CTO.com快译】默认情况下,MySQL服务器仅侦听来自localhos...
如何利用交换机和端口设置来管理... 在网络管理中,总是有些人让管理员头疼。下面我们就将介绍一下一个网管员利用交换机以及端口设置等来进行D...
施耐德电气数据中心整体解决方案... 近日,全球能效管理专家施耐德电气正式启动大型体验活动“能效中国行——2012卡车巡展”,作为该活动的...
Windows恶意软件20年“... 在Windows的早期年代,病毒游走于系统之间,偶尔删除文件(但被删除的文件几乎都是可恢复的),并弹...
20个非常棒的扁平设计免费资源 Apple设备的平面图标PSD免费平板UI 平板UI套件24平图标Freen平板UI套件PSD径向平...
德国电信门户网站可实时显示全球... 德国电信周三推出一个门户网站,直观地实时提供其安装在全球各地的传感器网络检测到的网络攻击状况。该网站...
着眼MAC地址,解救无法享受D... 在安装了DHCP服务器的局域网环境中,每一台工作站在上网之前,都要先从DHCP服务器那里享受到地址动...
为啥国人偏爱 Mybatis,... 关于 SQL 和 ORM 的争论,永远都不会终止,我也一直在思考这个问题。昨天又跟群里的小伙伴进行...