VB.NET经过长时间的发展，很多用户都很了解VB.NET了，这里我发表一下个人理解，和大家讨论讨论。在VB.NET要做到四舍五入的功能应该用VB.NET Format这个函数，用CInt或CLng都只能取到整数部分，而用VB.NET Format函数可以取到你所指定的小数位数。
副程式：
- PublicFunctionRound(numAsVariant,nAsLong)AsString
- Round=Format(num,IIf(n>0,"0."&String(n,"0"),"0"))
- EndFunction
#T#叁数说明：num：欲四舍五入的数值。因为欲四舍五入的数值可能是Double或Single或是其它资料型态，所以这里把num宣告成Variant；如果把num宣告成Double，而欲四舍五入的数值是Single型态，就会出现资料型态不符合的错误；但是把num宣告成Variant则可避免这种错误，或是使用传值呼叫(ByVal)也可避免这种错误。其实我不确定这个观念是否正确，如果有误请来信指正，谢谢。n：取到小数点以下第n位。Round函数传回的是一个字串资料。
范例：
- PrivateSubCommand1_Click()
- DimaAsDouble
- a=1234.56789
- Debug.PrintFix(a)
- Debug.PrintInt(a)
- Debug.PrintCInt(a)
- Debug.PrintCLng(a)
- Debug.PrintRound(a,0)
- Debug.PrintRound(a,3)
- EndSub
执行後在VB的即时运算视窗出现以下结果：
- 1234
- 1234
- 1235
- 1235
- 1235
- 1234.568
Fix和Int是属於无条件舍去，但是他们两者在处理负数的部分仍有些微差异，请自行叁阅VBHelp；CInt和CLng也有四舍五入的功能，但是只能取到整数部分；Format则可以四舍五入到你所指定的小数位数。有一点值得一提的是，VB.NET Format的第二个叁数使用"0"和"#"的差异：
- format(123.4,".000")输出123.400
- format(123.4,".###")输出123.4
也就是说：第二个叁数使用"0"的，会自动补上多馀的0，有时候为了编排好看会希望这麽做；使用"#"的则不会自动补上0。
