我用格式化数据输出:比如:  a = Format(a, "#.###")使其小数点后面保留3位数值,但是输出来的时候前面的0不显示,比如0.123输出的结果是:.123。为什么会这样呀。我改为a = Format(a, "0.###")也不行,请问大家想使输出的结果小数前的0显示改怎么设置,即我想输出的数据效果是0.123.恳请大家帮帮忙!谢谢啦

解决方案 »

  1.   


    Option ExplicitPrivate Sub Form_Load()
      Dim a As Double
      Dim Data As String
      a = 0.5
      Data = Format(a, "0.###") '返回值要放入字符变量中,如果你还是放入/Double 型 变量中就无用了.
      
      MsgBox Data
    End Sub
      

  2.   

    开始 => 设置=> 打开控制面板区域和语言选项=>区域选项(选项卡)=>自定义=>进入下一对话框
    数字(选项卡)=>零起始显示 => 改为 0.X 类型.
      

  3.   

    print Format(a, "0.###")
    或text1.text=Format(a, "0.###")