单项选择题

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

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

单项选择题
设有如下程序： Private Sub Command1_Click( ) Dim c As Integer，d As Integer c=4 d=InputBox(“请输入一个整数”) Do While d＞0 If d＞c Then C=C+1 End lf d=InputBox(“请输入一个整数”) Loop Print c+d End sub 程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是
A．12
B．11
C．10
D．9
单项选择题
把窗体的KeyPreview属性设置为True，然后编写如下事件过程Private Sub Form_KeyPress(KeyAseii As Integer)Dim ch As Stringch=Chr(KeyAscii)KeyAscii=Ase(UCase(ch))Print Chr(KcyAseii+2)End Sub程序运行后，按键盘上的“A”键，则在窗体上显示的内容是
A．A
U．B
C．C
D．D
相关试题