题目
假定有如下事件过程: Phvate Sub Form_Click() DimXASInteger,nASInteger x=1 n=0 Do While x<28 x=x*3 n=n+1 Loop Ptint x,n End Sub 程序运行后,单击窗体,输出结果为______。
A. 81 4
B.56 3
C.28 1
D.243 5
第1题
在窗体上添加一个命令按钮,然后编写如下事件过程: Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程
A.35
B.33
C.31
D.29
第2题
假定有如下的窗体事件过程:
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 Visual
B.Microsoft
C.Basic
D.5
第3题
假定有如下的窗体事件过程: Private Sub Command1_Click() a$="Microsoft Visual Basic" b$=Riqht(a$, 5) c$=Mid(a$, 1, 9) MsgBox a$, 34, b$, c$, 5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是______。
A.Microsoft Visual
B.Microsoft
C.Basic
D.5
第4题
假定有如下的窗体事件过程: 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 Visual
B.Microsoft
C.Basic
D.5
第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 Visual
B.Microsoft
C.Basic
D.5
第6题
假定有如下事件过程: Privte 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 4
B.56 3
C.28 1
D.243 5
第7题
假定有如下事件过程:
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 4
B.56 3
C.28 1
D.243 5
第8题
假定有如下事件过程: 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 4
B.56 3
C.28 1
D.243 5
第9题
假定有如下的窗体事件过程: Private Sub Form_Click() a$="Microsoft Visual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) Msg Box aS,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是
A.Microsoft Visual
B.Microsoft
C.Basic
D.5
第10题
假定有如下事件过程: Private Sub Form_Cilck() 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 4
B.56 3
C.28 1
D.243 5
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!