我要发问?

黑角残叶

1.用什么涵数判定用户输入的内容是字符还是数字?
2.还有输入了多少位的字符?
3.怎样禁止输入非法字符?(如:!,@,#,$,%,^,&等等)

最爱水晶

第一个问题
Visual Basic Scripting Edition 语言参考
--------------------------------------------------------------------------------
IsNumeric 函数
返回 Boolean 值指明表达式的值是否为数字。
IsNumeric(expression)
expression 参数可以是任意表达式。
说明
如果整个 expression 被识别为数字，IsNumeric 函数返回 True；否则函数返回 False。如果 expression 是日期表达式，IsNumeric 函数返回 False。
下面的示例利用 IsNumeric 函数决定变量是否可以作为数值：
Dim MyVar, MyCheck
MyVar = 53 '赋值。
MyCheck = IsNumeric(MyVar) ' 返回 True。
MyVar = "459.95" ' 赋值。
MyCheck = IsNumeric(MyVar) ' 返回True。
MyVar = "45 Help" ' 赋值。
MyCheck = IsNumeric(MyVar) ' 返回 False。
要求
版本 1
请参阅
IsArray 函数 | IsDate 函数 | IsEmpty 函数 | IsNull 函数 | IsObject 函数 | VarType 函数

--------------------------------------------------------------------------------
? 2000 Microsoft Corporation 版权所有。保留所有权利。使用规定。

落叶秋雨

第二个问题

Visual Basic Scripting Edition 语言参考
--------------------------------------------------------------------------------
Len 函数
返回字符串内字符的数目，或是存储一变量所需的字节数。
Len(string | varname)
参数
string
任意有效的字符串表达式。如果 string 参数包含 Null，则返回 Null。
Varname
任意有效的变量名。如果 varname 参数包含 Null，则返回 Null。
说明
下面的示例利用 Len 函数返回字符串中的字符数目：
Dim MyString
MyString = Len("VBSCRIPT") 'MyString 包含 8。
注意 LenB 函数与包含在字符串中的字节数据一起使用。LenB 不是返回字符串中的字符数，而是返回用于代表字符串的字节数。
要求
版本 1
请参阅
InStr 函数

--------------------------------------------------------------------------------
? 2000 Microsoft Corporation 版权所有。保留所有权利。使用规定。

ご倾城↘恋

第三个问题，用正则表达式判断