手机
当前位置:查字典教程网 >编程开发 >编程10000问 >如何准确地获得一个整数?
如何准确地获得一个整数?
摘要:如何准确地获得一个整数?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

【如何准确地获得一个整数?】相关文章:

如何在读取Excel文件时创建列表的下拉菜单?

如何实现在下拉菜单里输入文字?

如何做一个密码“生成器”?

如何利用数据库内容建立一个下拉式列表?

如何对一个文件夹进行创建和删除?

如何编写一个加法器?

如何动态添加Form项?

如何制作一个弹出式的调查窗口?

如何测试字符串的长度?

如何处理超时事件?

精品推荐
分类导航