- 1PS提示：因为图层已锁定，无法编辑图层的处理方法
- 2Adobe Illustrator CS5 序列号大全
- 3picacg苹果版怎么找不到|picacg ios版是不是下架了介绍
- 4ACDsee注册码免费分享（含ACDsee18、ACDsee10等版本）
- 5苹果iphone自动时间不准确的多种校正方法
- 6PDF浏览器能看3D文件吗？PDF浏览器看3D文件图文详细教程
- 7Potato(马铃薯聊天)怎么注册不了|Potato不能注册处理方法介绍
- 8Potato(土豆聊天)怎么换头像|Potato app更改头像方法介绍
- 9ipad版office如何激活? office365激活的图文说明教程
- 10最新的Adobe Illustrator CS4序列号大全
- 11Mac怎么通过设置VPN来登录youtube等国外网站
- 12qq邮件是否已读怎么看 QQ邮箱已经发出去的邮件怎么知道对方是否已经查看
[摘要]支持判断返回任何数值型的类型数据： Function GetNumType(sVal) Dim sType If Not IsNumeric(sVal) Then GetNumType="Unknow" Exit Function End If Execute "sT...
支持判断返回任何数值型的类型数据：
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
推荐资讯 总人气榜
