您所在的当前位置: 计算机等级考试题库   >  
BASIC题库  
问题:

[填空题] 以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。 Private Sub Command1_Click() Dim a As Integer,b As String a=InputBox("请输入一个正数") If a > 0 Then ______ Else b=MsgBox("error",0) End If End Sub

可能感兴趣的题目: