[求助]VBA的TextBox的输入格式问题?

vocabulary

各位大侠:
    VBA的TEXTBOX控件里有没有选项可以控制用户的输入格式,比如说只以允许输入数值型数据150.25或35.65等等,而不能输入"ABCD","Bill.Gates",如果没有这种功能,那有没有什么别的方法来阻止用户输入字符型数,请大家给指点指点,先谢谢了!

mccad

可以用事件处理的实现，如下：

2. Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
3.         If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
4.               KeyAscii = 0                     '取消字符。
5.               MsgBox "请输入数字"      '出错提示
6.         End If
7. End Sub

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)         If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then               KeyAscii = 0                     '取消字符。               MsgBox "请输入数字"      '出错提示         End If End Sub