怎样给数字加逗号分隔符

Question

要给一串数字每3位加逗号分隔符，有没有好一点的算法，我想了很久，可是方法太麻烦了

Answer 1

用left取3位，然后加“，”就行了

Answer 2

Private Sub Command1_Click()
MsgBox Format("123123123123123", "###,###, ###, ###, ###,###")
End Sub

Answer 3

Format("123456.7", "##, ###.##") 结果：123,456.7
Format("123456.7", "##, ###.00") 结果：123,456.70
Format("6.7", "##, ##0.00")      结果：      6.70
Format("6.7", "##, #00.00")      结果：     06.70对不，可在 VB 中测试！

Answer 4

fromat函数进行格式化是最简单的了~
可以递归实现~   实际上就是VB链表操作！

Answer 5

MsgBox FormatNumber(19862736, , , , vbTrue)

Answer 6

只要用  format(数字,"#,##0.00")  就型了    也没有必要有太多的#了