单项选择题

有如下程序：
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 Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print subl: ;p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print Main: ;a1;b1;c1 End Sub 程序运行后，输出结果为

A．
Sub：2 6 4
Main：2 6 4
B．
Sub：2 6 4
Main：2 6 4
C．
Sub：2 6 4
Main：1 2 3
D．
Sub：2 6 4
Main：2 2 3

单项选择题

有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为

A．0 0
B．1 1
C．2 2
D．1 2

相关试题