Microsoft Access 掲示板

Microsoft Access 掲示板

浮動小数の処理 / 1
1
hatena 2021/03/08 (月) 20:41:48

「浮動小数点数 誤差」でWEB検索してみてください。正確な計算をおこないたいときは、使えないものだと分かるでしょう。

また、変数はきちんと型を指定して宣言しましょう。型宣言無しに小数を代入すると浮動小数点数になります。

小数点4桁までなら、通貨型を使うと誤差のない計算ができます。

Dim SumFM As Currency
Dim ctl As TextBox
Dim i As Long
For i = 1 to 25
    set ctl = me.Controls("txt0" & Format (i,00))
    SumFM = SumFM + Nz(ctl ,0)
next i
通報 ...