感覺充值窗體比較簡單，整體上就是乙個資料庫寫入資料的操作，通過幾個判斷就可以把資料寫入資料庫了。
一、邏輯圖
二、**部分
1.如何判斷框內資料和資料庫資料大小
if val(txtaddmoney.text) < mrc.fields(5) then
txtaddmoney.setfocus
txtaddmoney.text = ""
endif
val() ：將數字字串換成數值
2.公式理解
mrc.fields(7) = (val(mrc.fields(7)) + val(txtaddmoney.text))公式：該公式的意思是 現在第7列字段的值等於之前第七列字段的值和文字框txtaddmoney的值的和。
這個窗體的難度不是很高，很是邏輯還是需要學習一下，另外涉及到了公式、邏輯運算子的知識，應該深入了解一下這方面的知識。
機房收費系統之充值窗體
流程圖 判斷是否輸入卡號 if testtxt txtcardno.text false then msgbox 請輸入卡號！0 48,提示 txtcardno.setfocus exit sub end if 判斷是否輸入充值金額 if testtxt txtaddmoney.text false...
機房收費之充值窗體
自學生系統之後的另乙個系統，不過這次沒有原始碼，需要自己去慢慢摸索，不能著急，在此期間也出了好多問題，下面來看看我弄了一下午的充值窗體吧 充值窗體功能 為卡充值金額，並對最新餘額進行更新。步驟 1 輸入卡號後，判斷該卡是否未註冊或者已登出 通過學生資訊表查詢 有個提示。2 輸入充值金額後判斷該金額是...
機房收費 充值
機房充值的窗體非常簡單，但是還是有幾個點需要注意 1.乙個加法 充值之後，需要乙個文字框來顯示現在的餘額，那麼需要將現在充值的餘額加上資料庫中的餘額。我定義了乙個變數來存放臨時金額，如下 dim depositmoney as string 存放臨時金額 充值的過程 depositmoney tri...