第一次机房收费系统之学生查看余额

流程图 代码 Private Sub cmdInquiry_Click() Dim txtSQL As String '用于存放SQL语句 Dim mrc As ADODB.Recordest '用于存放记录集 Dim msgtext As String '用于存放返回信息 '判断卡号是否输入 If Trim(txtCard

>>阅读原文<<