单项选择题

有如下程序:
Private Sub Form_Click()
Dimi As Integer,sumASInteger
sum=0
For i=2To 10
If i Mod2<>0 And i Mod 3=0 Then
sum=sum+i
End If
Nexti
Print sum
EndSub
程序运行后,单击窗体,输出结果为( )。

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

单项选择题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Prirate Sub Commandl_click() a$= software and hardware b$=Right(a$,8) c$=Mid(a$,1,8) MsgBoxa$,,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。
A.software andhardware
B.software
C.hardware
D.1
单项选择题
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程: Private Sub Commandl_Click() Counter=0 Fori=1T04 Forj=6 To 1 Step-2 Counter=Counter+1 Nextj Nexti Labell.Caption=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内容是( )。
A.11
B.12
C.16
D.20
相关试题
  • 下列程序是将数组a的元素倒序交换,即第1...
  • 以下程序用来计算由键盘输入的N个数中正数...
  • b(n,m)As Integer a(I,j)
  • Private Sub Form_Activate() Forj=...
  • ReDim a(m,n)As Integer