单项选择题

有如下程序：
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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() C=“ABCD” For n=1 To 4 Print____ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD
ABCD
则在横线处应填入的内容为(
)。A) Left(c,n)
B) Right(c,n)
C) Mid(c,n,1)
D) Mid(c,n,n)
单项选择题
在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s=0:j=1 a=Array(1，2，3，4) For i=4 To 1 Step-1 S=S+a(i)*i j=j*10 Next Print s End Sub 运行上面的程序并单击命令按钮，其输出结果是( )。
A) 4221
B) 1234
C) 34
D) 12
相关试题