Dim zf As String = Format(12345,"c" ) & Format(".00")Output.Show(zf)
在XP系统显示:¥12,345.00 WIN7系统显示:¥12,345.00 .00 咋回事