vb asp.net 判断值是否为数字

vb asp.net判断值是否为数字

If IsNumberic(ch_classht) = False Then
Response.Write("<script language='javascript'type='text/javascript'>alert('排序只能是数字.')</script>")
Response.End()
End If

'
'''<summary>
'''名称：IsNumberic
'''功能：判断输入的是否是数字
'''参数：string oText：源文本
'''返回值：　bool true:是　false:否
'''</summary>
PublicFunction IsNumberic(ByVal oText As String) As Boolean
Try
Dim var1 As Integer = Convert.ToInt32(oText)
Return True
Catch
Return False
End Try
EndFunction