单项选择题
有如下程序:
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