VB中使用文本框技巧两则

VB中的文本框在开发中用得十分频繁，下面是两则小技巧，与大家分享：

1．如何限制文本框只能输入数字键？
   代码：
   Private Sub Text1_KeyPress(KeyAscii As Integer)
       If Not (IsNumeric(Chr(KeyAscii)) Or KeyAscii = 8) Then KeyAscii = 0
   End Sub

2．如何控制文本框中只可以输入字符，禁止输入汉字？
   Text的IMEMode属性设为 3-Disable

   当然，以上办法只是作一般的限制，如果要做到完全的控制，那么还得把文本框的快捷键'Ctrl+V'和鼠标右键的粘贴给＂做掉＂才行．

                                                                      --- by 唐细刚