单项选择题

有如下程序：
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，然后编写如下的事件过程，输出结果为 Prinvate Sub Comandl_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+5 Next Next Next Print x End Sub
A．13
B．26
C．30
D．40
单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后输写如下程序： Private Sub Command1_Click() Dim x，y，z As Integer x=5 y=7 z=0 Text1.Text= Call Funl(x,y,z) Text1.Text=Str(z) End Sub Sub Funl(ByVal a As Integer，ByVal b As Integer，c As Integer) C=a+b End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是
A．0
B．12
C．Str(Z)
D．没有显示
相关试题