機房收費系統之下機

下機找好邏輯然後慢慢來，平靜下心來，其實也不難。 主要邏輯和上機還是挺像的。 如圖： 部分代碼如下： 一、判斷卡號是否爲空： If Trim(txtCardno.Text) = "" Then MsgBox "請輸入卡號，卡號不能爲空！", 48, "提示" Exit Sub '防止錯誤 3021 二、判斷此卡是否存在 Else txtsql = "select * fro

>>阅读原文<<