vb.net进位函数的简单介绍

asp.net(vb.net)中进一法用什么函数?

直接似乎找不出方法,不过有一个绝招: Dim

创新互联公司从2013年成立,先为宛城等服务建站,宛城等地企业,进行企业商务咨询服务。为宛城企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

a

As

Double

=

2.1415

a

+=

0.01

Console.WriteLine("{0:f2}",

a)首先先对要操作数组+0.0……1(若干个0,取决于保留的位数)。然后试用输出。在asp.net中,用string.Format("{0:f2}",输出数字);即可

VB.NET,八/十六进制转十进制的函数

VB.Net自带函数:

十进制转八进制:Oct(num)

十六进制转八进制:oct("H" num)

十进制转十六进制:hex(num)

八进制转十六进制:hex("O" num)

十六进制转换为十进制:CLng("H" num)

VB.net,小数点直接进一位的函数?

'自定义一个函数:功能是给小数直接进一位

'num  要操作的小数

'n 保留几位小数,

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

-------------------------

调用一下:

Private Sub Command1_Click()

MsgBox (getNumber(3.1415926, 2))

End Sub

得到3.15

vb.net里四舍五入用什么函数

使用Math.Round(),注意返回值可能为Double或Decimal。

如果取整,第二个参数不填或者填0

默认采用 四舍六入五成双,如果想四舍五入,请采用MidpointRounding.AwayFromZero作为第三个参数

Dim 数字 As Double = 2.45

Dim r1 As Double = Math.Round(数字, 1, MidpointRounding.ToEven) '  r1 = 2.4 四舍六入五成双

Dim r2 As Double = Math.Round(数字, 1, MidpointRounding.AwayFromZero) ' r2 = 2.5 四舍五入


本文标题:vb.net进位函数的简单介绍
文章来源:http://pwwzsj.com/article/dsgejgc.html