private sub text1_change()
創新互聯-專業網站定制、快速模板網站建設、高性價比贛州網站開發、企業建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式贛州網站制作公司更省心,省錢,快速模板網站建設找我們,業務覆蓋贛州地區。費用合理售后完善,十載實體公司更值得信賴。
text1.text=format(val(text1.text),"0.00")
end sub
代碼分析:
Math.Floor:返回小于或等于指定數字的最大整數。
Fix:返回數字的整數部分。
Math.Floor?和?Fix?函數都移除?Number?的小數部分并返回得到的整數值。
Math.Floor?和?Fix?函數之間的區別在于:如果?Number?為負,則?Math.Floor?返回小于或等于?Number?的第一個負整數,而?Fix?返回大于或等于?Number?的第一個負整數。例如,Math.Floor?將?-8.4?轉換成?-9,而?Fix?將?-8.4?轉換成?-8。
你的要求:如果你的要求是直接舍去,那么應當采用Fix方法,考慮到時負數的情況,那么采用Math.Floor將會出現非預期的結果。
測試結果:見附圖。
歡迎交流。
VB用Format 函數即可實現。
Format 函數,返回 Variant (String),其中含有一個表達式,它是根據格式表達式中的指令來格式化的。
Print Format(3.1415926, "#.##")
*#:表示一個數字位。#的個數決定了顯示區段的長度。如果要顯示的數值的位數小于格式字符串指定的區段長度,則該數值靠區段的左端顯示。如果要顯示的數值的位數大于指定的區段長度,則數值照原樣顯示。 要顯示多位,只需要設置數字位數即可,例如:
Print format(3.14159262654321,”#.#######”)
顯示:3.1415926
文章標題:vb.net兩位小數點 vba 兩位小數
文章轉載:http://vcdvsql.cn/article46/ddojgeg.html
成都網站建設公司_創新互聯,為您提供外貿網站建設、網站改版、網站設計、全網營銷推廣、企業建站、網站導航
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯