新建From1（窗体），新建Command1（按钮CommandButton），代码：

Private Sub Command1_Click()
    Debug.Print Format(1234567890.125, "#,##0.00")
End Sub

运行结果：

1,234,567,890.13