题目内容
（请给出正确答案）
某个窗体己编写下列事件过程。打开窗体运行后，单击窗体，消息框的输出结果为 ______。
Pfivate Sub Form_Click()
a＝1
i＝1
Do Until i＞10
a＝a+2
i＝i+3
Loop
MsgBox a
End Sub
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“某个窗体己编写下列事件过程。打开窗体运行后，单击窗体，消息框的输出结果为 ______。Pfivate Sub F”相关的问题
某个窗体己编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为【 】。
Private Sub Form_Click()
Dim k as Integer， n as Integer，m as Integer
n=10 ：m=1 : k=1
Do While k＜=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub
某个窗体已编写如下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为______。
PrivateSubForm_Click()
DimKasInteger,nasInteger,masInteger
n=10：m=1:k=1
DoWhileK＜=n
m=m*2
k=k+1
Loop
MsgBoxm
EndSub
某个窗体已编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为【 】。
Private Sub Form_Click()
Dim k As Integer,n As Integer，m As Integer
n=10：m=1：k=1
Do While k＜=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub
A.2 32
B.12 3
C.2 2
D.12 32
在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：
Private Sub Command1_Click()
Text1＝"VB programming"
Text2＝Text1
Text1＝"ABCD"
End Sub
程序运行后，单击命令按钮，文本框Text2中显示的内容为【 】。
在窗体上有一个命令按钮Commandl，编写事件代码如下：
Private SuB commandl_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call Proc(x,y)
OeBug.Print x;y
End SuB
PuBlic SuB Proc(n As Integer,Byval m As Integer)
n=n Mod 10
m=m Mod 10
End SuB
打开窗体运行后，单击命令按钮，立即窗口上输出的结果是
A．2 32
B．12 3
C．2 2
D．12 32
A.232
B.123
C.22
D.1232
在窗体上有一个命令按钮Commandl，编写事件代码如下：
Private SuB cormmandl_Click()
Dim y As Integer
y=0
Do
y=Input Box(“y=”)
IF(y Mod 10)+Int(y/10)=10 Then DeBug.print y;
Loop Until y=0
End SuB
打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、－19、0，立即窗口上输出的结果是
A．37 55 64 28 19 19
B．10 50 20
C．10 50 20 0
D．37 55 64 28 19
在窗体上有一个命令按钮Command1，编写事件代码如下： Private Sub Command 1_Click() Dim x As Integer，y As Integer x=12:y=32 Call Proe(X，Y) Debug.Print x；y End Sub Public Sub Proc(n As Integer，ByVal m As Integer) n=n Mod 10 m=in Mod 10 End Sub 打开窗体运行后，单击命令按钮，立即窗口上输出的结果是()。
A．2 32
B．12 3
C．2 2
D．12 32
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
