小数点の掛け算の結果について

いつもお世話になっております。

アクセスの小数点以下切捨ての処理で
つまずいております。

正直何が起こっているのかわかりません。
この症状をご存知の方がいらっしゃれば、
是非ご教授ください。

なぜ、4367.99980163574 になるのか
さっぱり理解できていません・・・

よろしくお願いします。

###前提・実現したいこと
電卓と同じ結果をもたらしたい。
消費税の切捨てをしたい。

###発生している問題・エラーメッセージ
テキストボックスに入っている値を計算させると
下記の結果になります。
直接入力すると電卓とおりの結果を出しますが・・・
（イミディエイトウインドウ）

?txtsum1.Value
 520 
?txttanka1.Value 
 8.4 
?txtsum1.Value * txttanka1.Value
 4367.99980163574 

?520*8.4
 4368

###該当のソースコード
さまよって、現時点のコードです。

        txtKin1.Value = txtSum1.Value * txtTanka1.Value
        kirisute = Split(Str(txtKin1.Value), ".")
        txtKin1.Value = Val(kirisute(0))
        txtZei1.Value = txtKin1.Value * 0.08
        kirisute = Split(Str(txtZei1.Value), ".")
        txtZei1.Value = Val(kirisute(0))

###試したこと
消費税の切捨てには、intやfixを使うとあり、
使ってみると、数字が合わないので、調べてました。
切捨てなので、文字列にして、カンマより左だけを
残せば切り捨てになるかと上記コードになりましたが、
結果は同じでした。

###補足情報(言語/FW/ツール等のバージョンなど)
access2013
テキストボックスの書式は、標準です。