QA=3660
QB=0.042
QC=153.72
QD=1
If RadioButton2.Checked = True Or RadioButton3.Checked = True Then
QD = TextBox4.Text
QC = QA * QB + 0.08
QE = QC * QD
Label1.Text = Format(QE, "0.#") 1
End If
If RadioButton2.Checked = True Or RadioButton4.Checked = True Then
QD = TextBox4.Text
QC = QA * QB
QE = QC * QD
Label1.Text = Format(QE, "0.#") 2
執行代碼RadioButton2.Checked = True 和 RadioButton3.Checked = True那么標記為1的Label1.Text顯示結果為153.7。
如果要是把標記為2的那一行Lable1.Text改為其他的Lable顯示執行代碼RadioButton2.Checked = True 和 RadioButton3.Checked = True那么標記為1的那一行顯示結果為153.8。
求大佬們普及這是什么原因，應該如何修復？
uj5u.com熱心網友回復：
根本原因是QA 和QD 一開始就被當做整形進行處理給每個變數都加上明確的型別宣告
dim QA as single,QB as single,QC as single,QD as single
uj5u.com熱心網友回復：
還是你厲害，我壓根就沒看明白他想表述的是啥意思
uj5u.com熱心網友回復：
感謝大師，我悟了轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/250926.html
標籤：VB基礎類
下一篇：似乎inotify不適用于NFS.是否有支持inotify的網路檔案系統的ReadDirectoryChangesW函式？