Dim A As Integer
Dim B As Single
A = 30
B = 0.4
lblS = A / B

とすると
lblSには75が入るの予定ですが、
lblSに変な小数点の数値が入ってしまいます。

どうしてでしょうか？