问题:不断读入两个字符串a,b。(小数点后只有两位)
      double型的c=cdbl(a)+cdbl(b)+c,
      当读入100多次a,b,然后相加的时候,c的小数位有10位。
      请问是出现了什么问题会这样,怎样可以设定它的小数位只有2位。
      谢谢!

解决方案 »

  1.   

    这个没有办法设的
    在输出的时候用Format设就可以了~Private Sub Form_Load()
        Dim c As Double
        
        Me.Show
        c = 111.22200101001
        
        Me.Print c
        Me.Print Format(c, "0.00")
    End Sub
      

  2.   

    因为double型是一个浮点型的,是由精度引起的
    你还可以试一下这个dim a  as single dim b as singlea=20050000
    b=20050001
    msgbox b-a你看看有什么结果,你可能更加不相信呢
      

  3.   

    你加的100多次a和b
    就相当于下面加的200多次a~Private Sub Form_Load()
        Dim c As Double
        Dim a As String
        Dim i As Long
        
        Me.Show
        a = "1.01"
        For i = 1 To 200
            c = c + CDbl(a)
        Next
        For i = 1 To 20
            c = c + CDbl(a)
            Me.Print c
        Next
    End Sub