搜索文章:

首页  |  Java技术  |  Asp.net  |  Asp编程  |  VC/C++  |  Delphi  |  VB编程

一个判断字符串的数值类型

作者: 整理
支持判断返回任何数值型的类型数据:

Function GetNumType(sVal)
Dim sType
If Not IsNumeric(sVal) Then
GetNumType="Unknow"
Exit Function
End If
Execute "sType=TypeName("&sVal&")"
GetNumType=sType
End Function

测试:
Response.Write GetNumType("9999") ‘’返回:Integer
Response.Write GetNumType("999999999") ‘’返回:Long
Response.Write GetNumType("99999999999999") ‘’返回:Double
Response.Write GetNumType("asdfasd") ‘’返回:Unknow
下一篇:重返ASP时代 >>
相关文章:
© 2006   www.java-asp.net