189 8069 5689
VB.Net自带函数：
创新互联公司坚持“要么做到，要么别承诺”的工作理念，服务领域包括：网站设计、做网站、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的丰顺网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
十进制转八进制：Oct(num)
十六进制转八进制：oct("H" num)
十进制转十六进制：hex(num)
八进制转十六进制：hex("O" num)
十六进制转换为十进制：CLng("H" num)
直接似乎找不出方法，不过有一个绝招： Dim
a
As
Double
=
2.1415
a
+=
0.01
Console.WriteLine("{0:f2}",
a)首先先对要操作数组+0.0……1（若干个0，取决于保留的位数）。然后试用输出。在asp.net中，用string.Format("{0:f2}",输出数字);即可
'自定义一个函数：功能是给小数直接进一位
'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