VB6     VB.NET    -------------------------...
来源于网络。感谢那些无私的提供者们! Abs(number)...