如何准确地获得一个整数?
摘要:如何准确地获得一个整数?functionNumbersOnlyNoDecimals(pInString)lNumbersOnly=""for...
如何准确地获得一个整数?
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
【如何准确地获得一个整数?】相关文章:
★ 如何用ASP建立Index Server查询对象并为其参数赋值?
上一篇:
如何检测字符串出现的次数?
下一篇:
如何编写一个小数转换分数的函数?