在VB中文本框处理灵活技术集萃

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

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

2、限定文本框的输入内容和格式。

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

Sub Text1_KeyPress (keyascii As Integer)

If keyascii < 48 Or keyascii > 57 Then

Beep

Beep

johny@nease.net

keyascii = 0

End If

End Sub