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