A.Microsoft Visual
B.Microsoft
C.Basic
D.5
[单选题]假定有如下的窗体事件过程:Private Sub Form_Click()a$="MicrosoftVisual Basic"b$=Right(a$,5)c$=Mid(a$,1,9)MsgBox a$,34,b$,c$,5E.nd Sub程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是A.Microsoft VisualB.MicrosoftC.BasicD.5
[单选题]假定有如下的窗体事件过程: Private Sub Form_Click() a$="Microsoft Visual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) MsgBoxa$,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是( )。A.Microsoft VisualB.MicrosoftC.BasicD.5
[单选题]假定有如下的窗体事件过程: Private Sub Form_Click() a$="MicrosoftVisual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是A.Microsoft VisualB.MicrosoftC.BasicD.5
[单选题]有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A)b=InputBox("请输入b的值") b=Val(B)a=a * b Loop Print aEnd Sub程序运行后,依次输人数值30,20,10,-1,输出结果为A.6000B.-10C.200D.-6000
[单选题]有如下事件过程: Private Sub Command1_Click() b=10 Do Until b =-1 a = InputBox("请输入a的值") a = Val(a)b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后,依次输入数值30,20,10,-1后,输出结果为( )。A.6000B.-10C.200D.-6000
[单选题]有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B) a=a*b Loop Print a End Sub 程序运行后,依次输入数值30,20,10,-1后,输出结果为( )。A.6000B.-10C.200D.-6000
[单选题]假定有如下事件过程: Private Sub Form. Click() Dim x As Integer, n As Integer x=1 n=0 Do While x<28 x=x*3 n=n+1 Loop Print x, n End Sub 程序运行后,单击窗体,输出结果是______。A.81 4B.56 3C.28 1D.243 5
[试题]假设有如下事件过程:Private Sub Command1_Click()msg1$="Are You Continue to?"msg2$="Open The Books"r=MsgBox(msg1$,34,msg2$)E.nd Sub运行该程序后,所出现的对话框的标题是[ ]。
[单选题]有如下程序:Private Sub Command1_Click()a$="A WORKER IS HERE"x=Len(a$)F.or i=1 To x - 1b$=Mid$(a$, i, 3)If b$="WOR" Then S=S + 1NextPrint SE.nd Sub单击命令按钮,程序运行结果为A.1B.2C.3D.5
[单选题]有如下程序:Private Sub Command1_Click()a$="A WORKER IS HERE"x=Len(a$)F.or i=1 To x-1b$=Mid$(a$,i,3)If b$="WOR",Then S=S+1NextPrint SE.nd Sub单击命令按钮,程序运行结果为AA.1B.2C.3D.5