[已解决]关于vba返回数值问题？

lizhengxu

如果定义a为variant，single，double等类型，例如，a=0.2。返回数值效果为.2，可是我想要0.2的显示效果。有没有好的方法？（排除&）
sub aa ()
dim a as variant
a=0.2
msgbox a
end sub

最佳答案

月排行榜 / 总排行榜

extyg

2013-2-15 00:01

控制面板-区域和语言选项-区域选项-自定义-数字-零起始显示-选0.7

跳转到最佳答案楼层

extyg

控制面板-区域和语言选项-区域选项-自定义-数字-零起始显示-选0.7

lizhengxu

extyg 发表于 2013-2-15 00:01
控制面板-区域和语言选项-区域选项-自定义-数字-零起始显示-选0.7

我用的excel2007，找不到控制面板。请具体提示。谢谢

这个数值是要连接其他字符的不知道可不可以实现小数点前加0，用text又感觉很麻烦。

那么的帅

lizhengxu 发表于 2013-2-15 01:03
我用的excel2007，找不到控制面板。请具体提示。谢谢

这个数值是要连接其他字符的不知道可不可以实现小 ...

控制面板 ，在我的电脑页面的左边。

hehehehebt

如果只需要 msgbox 显示的话 ， 定义成string的如何 ？ 应该就可以完整显示了。不过不能参与计算了。

happytiger2012

1. Debug.Print Format(a, "0.############")

复制代码

如果小数点后面的位数不大于#号的个数。

lizhengxu

happytiger2012 发表于 2013-2-15 10:04
如果小数点后面的位数不大于#号的个数。

format 可以实现，但是有很多数据需要显示。这样每个数据都要用一次format。
我原先用text。不知还有没有更简便方法。