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

posted @ 2011-01-21 12:58  web程序人生  阅读(333)  评论(0编辑  收藏  举报