直接似乎找不出方法,不過有一個絕招: Dim

創(chuàng)新互聯(lián)公司從2013年成立,先為宛城等服務(wù)建站,宛城等地企業(yè),進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為宛城企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。
a
As
Double
=
2.1415
a
+=
0.01
Console.WriteLine("{0:f2}",
a)首先先對要操作數(shù)組+0.0……1(若干個0,取決于保留的位數(shù))。然后試用輸出。在asp.net中,用string.Format("{0:f2}",輸出數(shù)字);即可
VB.Net自帶函數(shù):
十進(jìn)制轉(zhuǎn)八進(jìn)制:Oct(num)
十六進(jìn)制轉(zhuǎn)八進(jìn)制:oct("H" num)
十進(jìn)制轉(zhuǎn)十六進(jìn)制:hex(num)
八進(jìn)制轉(zhuǎn)十六進(jìn)制:hex("O" num)
十六進(jìn)制轉(zhuǎn)換為十進(jìn)制:CLng("H" num)
'自定義一個函數(shù):功能是給小數(shù)直接進(jìn)一位
'num 要操作的小數(shù)
'n 保留幾位小數(shù),
Function getNumber(num As Double, n As Integer) As Double
Dim a As Double
a = Int(num * (10 ^ n)) / (10 ^ n)
If a = num Then
getNumber = a
Else
getNumber = a + 1 / (10 ^ n)
End If
End Function
-------------------------
調(diào)用一下:
Private Sub Command1_Click()
MsgBox (getNumber(3.1415926, 2))
End Sub
得到3.15
使用Math.Round(),注意返回值可能為Double或Decimal。
如果取整,第二個參數(shù)不填或者填0
默認(rèn)采用 四舍六入五成雙,如果想四舍五入,請采用MidpointRounding.AwayFromZero作為第三個參數(shù)
Dim?數(shù)字?As?Double?=?2.45
Dim?r1?As?Double?=?Math.Round(數(shù)字,?1,?MidpointRounding.ToEven)?'??r1?=?2.4?四舍六入五成雙
Dim?r2?As?Double?=?Math.Round(數(shù)字,?1,?MidpointRounding.AwayFromZero)?'?r2?=?2.5?四舍五入
本文標(biāo)題:vb.net進(jìn)位函數(shù)的簡單介紹
轉(zhuǎn)載注明:http://chinadenli.net/article12/dsgejgc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供移動網(wǎng)站建設(shè)、App設(shè)計(jì)、網(wǎng)站收錄、面包屑導(dǎo)航、用戶體驗(yàn)、外貿(mào)建站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)