- 时间：2022-08-04 13:32 编辑： 来源： 阅读：
- 扫一扫，手机访问
摘要：如何准确地获得一个整数？
[h2]如何准确地获得一个整数？
[/h2]function NumbersOnlyNoDecimals(pInString)
lNumbersOnly = ""
for x = 1 to len(pInString)
y = (len(pInString)-x+1)
if isNumeric(mid(pInString, y,1)) then
lNumbersOnly = lNumbersOnly + mid(pInString,y,1)
else
if mid(pInString,y,1) = "." then
lNumbersOnly = ""
end if
end if
next
for x = 1 to len(lNumbersOnly)
y = len(lNumbersOnly) - x + 1
lNumbersOnlyForward = lNumbersOnlyForward + mid(lNumbersOnly,y,1)
next
if lNumbersOnlyForward = "" then lNumbersOnlyForward = "0"
NumbersOnlyNoDecimals = lNumbersOnlyForward
end function
机械节能产品生产企业官网模板...
大气智能家居家具装修装饰类企业通用网站模板...
礼品公司网站模板
宽屏简约大气婚纱摄影影楼模板...
蓝白WAP手机综合医院类整站源码（独立后台）...
