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
標(biāo)簽:襄陽(yáng) 雞西 威海 柳州 中山 朔州 遵義 邯鄲
巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《如何準(zhǔn)確地獲得一個(gè)整數(shù)?》,本文關(guān)鍵詞 如何,準(zhǔn)確,地,獲得,一個(gè),;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。