单项选择题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, x As Integer For i=1 To 6 If i=1 Then x=i If i＜=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为______。

A．9
B．6
C．12
D．15
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程： Private Sub Command1_Click() strText=InputBox( 请输入 ) Text1. Text=strText End Sub Private Sub Text1_Change() Label1. Caption=Right(Trim(Text1. Text), 3) End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是______。
A．空
B．abcdef
C．abc
D．def
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： option Base 1 Private Sub Command1_Click() Dim s As Variant a=Array(1, 2, 3, 4, 5) Sum=0 For i=1 To 5 Sum=Sum_a(i) Next i X=Sum 5 For i=1 To 5 If a(i)＞x Then Print a(i); Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。
A．1 2
B．1 2 3
C．3 4 5
D．4 5
相关试题