Kevin

摘要： 最近有点闲，刚好广发信用卡的业务员来公司推销！就写了这个计算器！界面效果：代码如下：Private Sub Command1_Click() Label4.Caption = "" If Not IsNumeric(Text1.Text) Then MsgBox "提现金额只能为数字！请重新输入！", vbOKOnly + vbInformation, "提示！": Text1.SetFocus:... 阅读全文