两个数字相除后 所得结果的问题

Question

各位大哥
我碰到个问题
就是当一个数值除以另外一个数值后的值 在0-1之间时 
现在显示出来的是
例如
1/10=.1
请问如何可以在进行 1/10 的运算后 得到 0.1这种方式的显示呢
我用ccur,cdbl,round,format 等方法后 还都是没法转变
有知道的 请帮帮我吧

Answer 1

再不济还可以Format(2345.2345, "0.#########")

Answer 2

FormatNumber(1 / 10, , vbTrue)

Answer 3

MsgBox Format(1 / 10, "0.0")
 这样就可以了撒

Answer 4

根据小数点来剪开数据,这估计是比较笨的方法了,hoho
Private Sub Command4_Click()
    Dim a As string
    Dim i As Integer
    a = 1234.12
    For i = 1 To Len(a)
        If Mid(a, i, 1) = "." Then
            a = Format(Mid(a, i), "0.00")
            Exit For
        End If
    Next
    MsgBox a
End Sub