更多"某个窗体已编写如下事件过程。打开窗体运行后，单击窗体，消息框的输出结果"的相关试题:
[填空题]为某个窗体编写如下事件，单击窗体，消息框显示的结果为 。
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
[填空题]为某个窗体编写如下事件，单击窗体，消息框显示的结果为 【13】 。
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
[填空题]为某个窗体编写如下事件，单击窗体，消息框显示的结果为 【13】 。
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
[填空题]在窗体上画两个文本框，其名称分别为Namel和PassWordl，然后编写如下事件过程
Private Sub Form_Load（ ）
Show
Namel．Text=" "
Passwordl．Text=" "
Passwordl．SetFocus
End Sub
Private Sub Passwordl_KeyDown(KeyCode As Integer，Shift As Integer)
Namel．Text=Name1．Text+Chr(KeyCode - 3)
End Sub
程序运行后，如果在Passwordl中输入“hit’’’，则在Namel文本框中显示的内容是【 】。
[填空题]某个窗体已编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为
Private Sub Form_Click（ ）
a=1
i=1
Do Until i＞10
a=a+2
i=i+3
Loop
MsgBox a
End Sub
[填空题]某个窗体己编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为
Private Sub Form_Click（ ）
a＝1
i＝1
Do Until i＞10
a＝a+2
i＝i+3
Loop
MsgBox a
End Sub
[单项选择]在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click（ ） Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是
A. 11
B. 10
C. 9
D. 8
