单项选择题

在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：
Private Sub Commandl_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和Timerl，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序： Private Sub Commandl_Click() Timerl.______ End Sub Private Sub Timerl_Timer() Text1.Text=Time End Sub 在下划线处应填入的内容是（）。

A．Enabled=True
B．Enabled=False
C．Visible=True
D．Visible=False

单项选择题

把窗体的KeyPreview属性设置为Tree，然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后，按键盘上的“A”键，则在窗体上显示的内容是（）。

A．A
B．B
C．C
D．D

相关试题