单项选择题

有如下程序： Private Sub Form_Click( ) Dim i As Integer, Sum As Integer Sum = 0 For i = 2 To 10 If i Mod 2＜ ＞0 And i Mod 3=0 Then Sum = Sum + i End If Next Print Sum End Sub 程序运行后，单击窗体，输出结果为

A．12
B．30
C．24
D．18
<上一题 目录 下一题>
热门 试题

单项选择题
编写如下事件过程： Private Sub Form KeyDown (KeyCode As Integer, Shift As Integer) Print Chr (KeyCode) End Sub Private Sub Form_KeyPress( KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，若按“T”键，则程序输出的结果是
A．T T
B．t T
C．T t
D．t t
单项选择题
有如下程序： Private Sub Command1_Click() as= A WORKER IS HERE x = Len(a$) For i=1 To x - 1 b$ =Mid$(a$, i,3) If b$ = WOR Then S=S+ 1 Next Print S End Sub 单击命令按钮，程序运行结果为
A．1
B．2
C．3
D．5
相关试题