关于浮点数的问题

在VB中，浮点数有Single（单精度浮点型）、Double（双精度浮点型），并不象你那样“四舍五入”，如：Single存储为 IEEE 32 位（4 个字节）浮点数值的形式，它的范围在负数的时候是从 -3.402823E38 到 -1.401298E-45，而在正数的时候是从 1.401298E-45 到 3.402823E38，在一般非科学计算精度已足够，不会象上述取整后再除。
如下，ｃ=4.702703
Private Sub Form_Load()
Dim a As Single
Dim b As Single
Dim c As Single
a = 17.4
b = 3.7
c = a / b
End Sub