为使文本框只能显示不能输入(文本框只能输入数字)

导读 大家好,我是小曜,我来为大家解答以上问题。为使文本框只能显示不能输入,文本框只能输入数字很多人还不知道,现在让我们一起来看看吧!1...

大家好,我是小曜,我来为大家解答以上问题。为使文本框只能显示不能输入,文本框只能输入数字很多人还不知道,现在让我们一起来看看吧!

1、加入如下代码段:

2、Private Sub Text1_KeyPress(KeyAscii As Integer)

3、If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii <> 46 And KeyAscii <> 8 Then

4、 MsgBox "只能输入数字!", , "提示"

5、 KeyAscii = 0

6、End If

7、End Sub

8、除了数字,小数点和退格键,其他字符输入时都会报错,msgbox为报错语句。

本文到此讲解完毕了,希望对大家有帮助。

最新文章