用這個函數(shù)把
創(chuàng)新互聯(lián)于2013年成立,先為北京等服務(wù)建站,北京等地企業(yè),進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為北京企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。
Math.Round 方法 (Decimal, Int32)
將小數(shù)值舍入到指定精度。
命名空間: System
程序集: mscorlib(在 mscorlib.dll 中)
語法
Visual Basic(用法)
Dim d As Decimal
Dim decimals As Integer
Dim returnValue As Decimal
returnValue = Math.Round(d, decimals)
參數(shù)
d
類型:System.Decimal
要舍入的小數(shù)。
decimals
類型:System.Int32
返回值中的小數(shù)位數(shù)(精度)。
返回值
類型:System.Decimal
精度等于 decimals,最接近 d 的數(shù)字。
Math.Round(3.4666666, 4) 結(jié)果是 3.4667.
保留兩位小數(shù)的一般方法是四舍五入法。
保留兩位小數(shù),看千分位。是4或比4小舍去;是5或比5大舍去以后向前一位進(jìn)1。
如:3.425保留兩位小數(shù)就是3.43
3.421保留兩位小數(shù)就是3.42
又如: 3.4263保留兩位小數(shù)就是3.43
3.4233保留兩位小數(shù)就是3.42
再如:3.4保留兩位小數(shù)就是3.40
方法如下:
方法一:
保留三位整數(shù):
Dim X As Single
X = Val(InputBox("輸入一個任意實數(shù)!"))
Print Format(X, "000")
保留三位小數(shù):
Dim X As Single
X = Val(InputBox("輸入一個任意實數(shù)!"))
Print Format(X, ".000")
方法二:
用Format函數(shù),比如通過text輸入,轉(zhuǎn)換后在窗體打?。篜rivate Sub Command1_Click()
n = Text1.Text
t = Format(n, "000.###")
Print t
End Sub
名稱欄目:vb.net保留有效數(shù)字 vb中保留一位小數(shù)的代碼
轉(zhuǎn)載來源:http://jinyejixie.com/article48/dohpchp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供域名注冊、網(wǎng)站收錄、App設(shè)計、云服務(wù)器、服務(wù)器托管、定制開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)