如何准确地获得一个整数？

网络编程 2024/11/15 佚名

2 0 1

极乐门资源网 Design By www.ioogu.com

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

for x = 1 to len(lNumbersOnly)

y = len(lNumbersOnly) - x + 1

lNumbersOnlyForward = lNumbersOnlyForward + mid(lNumbersOnly,y,1)

if lNumbersOnlyForward = "" then lNumbersOnlyForward = "0"

NumbersOnlyNoDecimals = lNumbersOnlyForward

end function

标签：

极乐门资源网 Design By www.ioogu.com

极乐门资源网 免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com

极乐门资源网 Design By www.ioogu.com

评论“如何准确地获得一个整数？”

暂无如何准确地获得一个整数？的评论...

2024年11月15日