這要看是什么除法,如果是普通除法是不進行舍入的,而如果是整除則要先把除數(shù)與被除數(shù)進行取整后再進行計算,如果計算結(jié)果帶小數(shù)則再次取整。

陽谷網(wǎng)站制作公司哪家好,找創(chuàng)新互聯(lián)公司!從網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、響應(yīng)式網(wǎng)站建設(shè)等網(wǎng)站項目制作,到程序開發(fā),運營維護。創(chuàng)新互聯(lián)公司從2013年開始到現(xiàn)在10年的時間,我們擁有了豐富的建站經(jīng)驗和運維經(jīng)驗,來保證我們的工作的順利進行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)公司。
比如:
13.5 / 2.5 = 5.4
13.5 \ 2.5 = 14 \ 2 = 7
你會發(fā)現(xiàn)這兩種除法的運算結(jié)果差別很大,這是因為VB在進行數(shù)字的舍入以及取整的時候采用的并不是“四舍五入”原則,而是“四舍六入五成雙”原則,具體的你可以上百度百科查一查。
Option Explicit On
Option Strict On
Imports System
Module Program
Sub Main()
Dim s As String
Dim strs As String()
Dim fz,fm,n,m,t As Long
Console.Write("請輸入一個小數(shù):")
s=Console.ReadLine().Trim()
strs=s.Split("."C)
fz=CLng(strs(0))
fm=CLng(Math.Pow(10,strs(1).Length))
fz=fz*fm+CLng(strs(1))
n=fz
m=fm
While n Mod m0
t=n Mod m
n=m
m=t
End While
fz\=m
fm\=m
Console.WriteLine("{0}={1}/{2}",s,fz,fm)
Console.Write("Press any key to continue . . . ")
Console.ReadKey(True)
End Sub
End Module
以下舉例二種寫法:
1:Print Round("1.256", 2) '保留2位小數(shù)并四舍五入
2:Print Format("0.256", "0.00")'保留2位小數(shù)并四舍五入,小于1大于-1的數(shù),個位數(shù)為添加0。
用于計算器,建議用;
Print Format$("0.256", "0.00")
用這個函數(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.
可以用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
當(dāng)前標(biāo)題:vb.net除法得到小數(shù),vb里整除直接忽略小數(shù)嗎
分享URL:http://chinadenli.net/article40/hsgeho.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站建設(shè)、網(wǎng)站設(shè)計、標(biāo)簽優(yōu)化、定制網(wǎng)站、網(wǎng)站改版、面包屑導(dǎo)航
聲明:本網(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)