Excel VBA十进制数字在文本输出中被转换为整数
我有一个电子表格,我写了一个macros,它使用电子表格中的一些值来输出一个文本文件。 一切工作正常,除了一个问题:
如果我有一个像15.0这样的浮点数,它将在输出文本文件中显示为整数15,没有小数点。 如果小数点后的数字不是零,我不会观察到同样的问题,例如15.1写成15.1; 那里没有问题。
我不知道是否有某种命令或属性,这将强制所有数字写入输出文件为浮动数字?
这是我写的数字文本文件的行。 WeightList(i)和SpacingList(i)是string数组,用于存储从电子表格收集的数字。
Print #1, Chr(9); "<truck axleW=" & Chr(34) & _ WeightList(i) & Chr(34) & " axleS=" & _ Chr(34) & SpacingList(i) & Chr(34) & "></truck>"
谢谢!
编辑:这是数字转换为string的行,我尝试使用格式命令,但这并没有帮助:
WeightList(i) = Format("0.0", Truck(i).AxleWeights(i))
EDIT2:在改变格式命令中参数的顺序之后,代码现在可以工作了。 有关详细信息,请参阅接受的答案。
您可以使用format(value,"0.0")
将其转换为具有所需信号的string。
编辑 – 对不起,顺序颠倒了…
如何使用FormatNumber
FormatNumber(value, 1)
请参阅http://msdn.microsoft.com/en-us/library/xfta99yt(v=vs.80).aspx