请教高手,vba\vb如何判断变量的类型,进而加以限制？

来源：百度知道 编辑：UC知道 时间：2024/06/18 01:55:14
教高手,vba\vb如何判断变量的类型,进而加以限制？
具体的是，我设计了一个程序，里面有很多TEXTBOX控件，我想限制它的格式，只能为数字，可都只能为百分数，或都只能为文本，怎么做？

不用判断类型,直接限制字符就OK了,下面这段代码可以限制中英文和大小写字母
你只要把允许的字符写到strCanInput内就OK了

Private Sub Text1_KeyPress(KeyAscii As Integer)
    Dim strCanInput As String
    strCanInput = "1234567890.%汉字Aa" & Chr(8) 'chr(8)是退格键,建议保留

    If InStr(strCanInput, Chr(KeyAscii)) > 0 Then
        '如果在允许范围内,什麽也不做
    Else
        '不在允许范围内禁止输入
        KeyAscii = 0
    End If
End Sub

没有办法阻止它输入，只能输入后用正则表达式验证，如果不符则变回原来的值。