VB用Format 函数即可实现。
遂宁网站建设公司创新互联建站,遂宁网站设计制作，有大型网站制作公司丰富经验。已为遂宁近1000家提供企业网站建设服务。企业网站搭建\成都外贸网站制作要多少钱，请找那个售后服务好的遂宁做网站的公司定做！
Format 函数，返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。
Print Format(3.1415926, "#.##")
*#：表示一个数字位。#的个数决定了显示区段的长度。如果要显示的数值的位数小于格式字符串指定的区段长度，则该数值靠区段的左端显示。如果要显示的数值的位数大于指定的区段长度，则数值照原样显示。 要显示多位，只需要设置数字位数即可，例如：
Print format(3.14159262654321,”#.#######”)
显示：3.1415926
直接用int就可以了。
int(2310.125)=2310
如果需要自定义格式输出,就要用tostring方法，比如：
2310.231.tostring("0")的结果就是2310。
如果你要去掉个位数，看来只有（2310.231/10).tostring("0")了。
详细的ToString里面的参数，请看MSDN。我查了一下，有，地址是：
果在格式化数字时没有指定 format，Format 会提供与 Str 函数类似的功能
' 如果没有指定格式，则返回字符串。
MyStr = Format(23) ' 返回 "23"。
' 用户自定义的格式。
MyStr = Format(5459.4, "##,##0。00") ' 返回 "5,459.40"。
MyStr = Format(334。9, "###0。00") ' 返回 "334.90"。
MyStr = Format(5, "0。00%") ' 返回 "500.00%"。
MyStr = Format("HELLO", "") ' 返回 "hello"。
MyStr = Format("This is it", "") ' 返回 "THIS IS IT
