【单选题】有如下程序 Option Explicit Private Sub command1_click() Dim a As Integer, b As Integer, c As Integer, abc As Integer a = InputBox("a=?") b = InputBox("b=?") c = InputBox("c=?") abc = a If b > abc Then abc ...
【单选题】在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序: Private Sub Text1_LostFocus( ) If Not IsNumeric(Text1) Then MsgBox "帐号有非数字字符错误" Text1.Text = "" Text1.SetFocus else MsgBox "帐号正确" End If End Sub 当在text1文本框中输入字符...