VB用Format 函數(shù)來(lái)實(shí)現(xiàn)。
成都創(chuàng)新互聯(lián)公司自成立以來(lái),一直致力于為企業(yè)提供從網(wǎng)站策劃、網(wǎng)站設(shè)計(jì)、網(wǎng)站制作、成都網(wǎng)站設(shè)計(jì)、電子商務(wù)、網(wǎng)站推廣、網(wǎng)站優(yōu)化到為企業(yè)提供個(gè)性化軟件開(kāi)發(fā)等基于互聯(lián)網(wǎng)的全面整合營(yíng)銷(xiāo)服務(wù)。公司擁有豐富的網(wǎng)站建設(shè)和互聯(lián)網(wǎng)應(yīng)用系統(tǒng)開(kāi)發(fā)管理經(jīng)驗(yàn)、成熟的應(yīng)用系統(tǒng)解決方案、優(yōu)秀的網(wǎng)站開(kāi)發(fā)工程師團(tuán)隊(duì)及專(zhuān)業(yè)的網(wǎng)站設(shè)計(jì)師團(tuán)隊(duì)。
Format 函數(shù),返回 Variant (String),其中含有一個(gè)表達(dá)式,它是根據(jù)格式表達(dá)式中的指令來(lái)格式化的。
Private?Sub?Command3_Click()
Print?Format(5?/?256,?"#.##")
End?Sub
舉個(gè)例子
Dim a As Decimal = 1.999
Dim b As Decimal = Math.Round(a, 2)
結(jié)果為b = 2.00
四舍五入保留兩位
private sub text1_change()
text1.text=format(val(text1.text),"0.00")
end sub
VB用Format 函數(shù)即可實(shí)現(xiàn)。
Format 函數(shù),返回 Variant (String),其中含有一個(gè)表達(dá)式,它是根據(jù)格式表達(dá)式中的指令來(lái)格式化的。
Print Format(3.1415926, "#.##")
*#:表示一個(gè)數(shù)字位。#的個(gè)數(shù)決定了顯示區(qū)段的長(zhǎng)度。如果要顯示的數(shù)值的位數(shù)小于格式字符串指定的區(qū)段長(zhǎng)度,則該數(shù)值靠區(qū)段的左端顯示。如果要顯示的數(shù)值的位數(shù)大于指定的區(qū)段長(zhǎng)度,則數(shù)值照原樣顯示。 要顯示多位,只需要設(shè)置數(shù)字位數(shù)即可,例如:
Print format(3.14159262654321,”#.#######”)
顯示:3.1415926
1、打開(kāi)VB6.0軟件,新建一個(gè)標(biāo)準(zhǔn)exe工程;
2、在設(shè)計(jì)界面上新建一個(gè)Command控件;
3、雙擊Command1控件,進(jìn)入代碼編輯界面,輸入代碼:
Private?Sub?Command1_Click()
Dim?res?As?Double
res?=?Format(1?/?3,?"0.000")
Print?res;
End?Sub
4、運(yùn)行工程,單擊按鈕,可以看到數(shù)據(jù)被保留三位小數(shù);
5、總結(jié),想要保留幾位小數(shù),直接設(shè)置即可,如想設(shè)置保留5位小數(shù),設(shè)置如下:
format(1/3,"0.00000")
新聞名稱(chēng):vb.net取兩位小數(shù) vb取小數(shù)點(diǎn)后兩位
標(biāo)題來(lái)源:http://aaarwkj.com/article30/hhhpso.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供ChatGPT、做網(wǎng)站、云服務(wù)器、網(wǎng)站收錄、電子商務(wù)、自適應(yīng)網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)