用什么语句或函数来判断一个表单中文本框输入的内容

是否是单精度型或双精度型的数字???在线急等

ASP判断代码
<%
Function VTPInt(Val)
On Error Resume Next
IF VarType(CInt(Val))<>2 Then
Response.Write "是整数"
Else
Response.Write "不是整数"
End IF
End Function
%>
红字的地方是关键点
关键函数VarType()作用判断数据类型。

ON ERROR RESUME NEXT ???是什么意思

VARTYPE()函数执行之后,会得出一个数据的字长宽度么???

为什么用<>2来判断,是说整数的字长宽度是2位么??

val 是表单提交的内容吗？
<>2 是什么意思啊？？

ON ERROR RESUME NEXT ???是什么意思
防止错误，因为
CInt("123")不会错误如果CInt("abc")
就会出现错误，而无法进行判断。
VARTYPE()
函数用来判断数据类型
后面的是返回的常量
常量 值 含义
vbEmpty 0 Empty（未初始化）
vbNull 1 Null(无有效数据）
vbInteger 2 整数
vbLong 3 长整数
vbSingle 4 单精度浮点数
vbDouble 5 双精度浮点数
vbCurrency 6 货币
vbDate 7 日期
vbString 8 字符串
vbObject 9 Automation对象
vbError 10 错误
vbBoolean 11 Boolean
vbVariant 12 Variant（只和变量数组一起使用）
vbDataObject 13 数据访问对象
vbByte 17 字节
vbArray 8192 数组

如果是字符串的话,ON ERROR RESUME NEXT 这句如何实现防止出错,它将怎么样执行,

如果想出现一个提示的话,比如:您输入的数据无效,该怎么样实现!

<%
Function VTPInt(Val)
On Error Resume Next
IF VarType(CInt(Val))<>2 Then
Response.Write "是整数"
Else
Response.Write "不是整数"
End IF
End Function
%>
VarType返回的值不是需要的数据类型不就是“无效数据”吗？
On Error是为了防止强制类型转换时出现错误，不加执行到
CInt(Val)时就有可能出错误，而无法继续执行IF语句，无法进行判断。