单项选择题

有如下程序：
Option Base 1
Pfivate Sub Form_Click()
　Dim arr,Sum
　Sum=0
　arr=Array(1,3,5,7,9,11,13,15,17,19)
　For i=1 To 10
　　If arr(i)/3=arr(i)\3 Then
　　　Sum=Sum+arr(i)
　　End If
　Nexti
　print Sum
End Sub
程序运行后，单击窗体，输出结果为( )。

A．25
B．26
C．27
D．28
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上绘制一个名称为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)
单项选择题
复选框的Value属性为0时，表示( )。
A．复选框未被选中
B．复选框被选中
C．复选框内有灰色的勾
D．复选框操作有误
相关试题