vb.net怎么設置數(shù)字保留小數(shù)點位數(shù)

舉個例子

成都創(chuàng)新互聯(lián)的客戶來自各行各業(yè)，為了共同目標，我們在工作上密切配合，從創(chuàng)業(yè)型小企業(yè)到企事業(yè)單位，感謝他們對我們的要求，感謝他們從不同領(lǐng)域給我們帶來的挑戰(zhàn)，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。專業(yè)領(lǐng)域包括成都網(wǎng)站制作、成都網(wǎng)站設計、電商網(wǎng)站開發(fā)、微信營銷、系統(tǒng)平臺開發(fā)。

Dim a As Decimal = 1.999

Dim b As Decimal = Math.Round(a, 2)

結(jié)果為b = 2.00

四舍五入保留兩位

VB.net，小數(shù)點直接進一位的函數(shù)?

'自定義一個函數(shù)：功能是給小數(shù)直接進一位

'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

vb.net 怎樣使計算結(jié)果只保留四位小數(shù)？

用這個函數(shù)把

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.

VB.NET怎樣實現(xiàn)某一范圍內(nèi)的隨即小數(shù)?例如2.1到3.4之間。

可以用Rnd函數(shù)實現(xiàn)

Rnd 函數(shù)返回小于 1 但大于或等于 0 的值。

為了生成某個范圍內(nèi)的隨機整數(shù)，可使用以下公式：

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

這里，upperbound 是隨機數(shù)范圍的上限，而 lowerbound 則是隨機數(shù)范圍的下限。

你這里可以先把范圍擴大10倍，看成21到34之間的隨機數(shù)，最后再除以10就行了。

Int((34 - 21 + 1) * Rnd + 21) / 10