-1～1之间的数如何显示整数位上的0

显示全部楼层 · 2009-7-18 12:01:52

编程计算数值时，如果计算结果在-1～1之间，显示在文本框中时，不显示整数位上的0（如，计算结果为0.333时，在文本框中显示这个结果时是.333，而不是0.333；计算结果是-0.654时，显示为-.654，而不是-0.654），我试了用STR（），CSTR（）都显示不出来，用什么函数或方法或修改文本框的属性把小数点前的0显示出来。

千问 · 2009-7-18 12:01:52

取绝对值，负的变成正的，再用len取字符长度，把小数点去掉，x*10^(len(x)-2),比如x=0.222,去掉小数是y=0.222*10^3,文本框显示的是 "." &y,如果开始是负数，就是"-" & "." & y,这样应该就可以了。...

千问 · 2009-7-18 12:01:52

Text1 = Format(a, "0.#")才可以，上面的只能显示三位小数。...

千问 · 2009-7-18 12:01:52

用format~Private Sub Form_Click()a = 0.333Text1 = Format(a, "0.000")End Sub...