单项选择题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：
Private Sub Command1_Click()
s=0
For i=1 To 15
x=2 *1-1
If x Mod 3=0 Then s=s+1
Next i
Label1.Caption=s
End Sub
程序运行后，单击命令按钮，则标签中显示的内容是______。

A．1
B．5
C．27
D．45
<上一题 目录 下一题>
热门 试题

单项选择题
有如下程序： Dim arr (3, 3) For j=1 To 3 For k=1 To 3 arr(j, k)=(j-1)*3+k Next k Next j For j=2 To 3 For k=2 To 3 Print arr(k, j); Next k Print Next j 运行后，输出的结果是______。
A．2 5
3 6
B．5 8
6 9
C．4 7
5 8
D．5 9
6 8
单项选择题
下列程序段的执行结果为______。 Dim A(4) n=3 A(1)=1 For k=0 To n-1 For 1=1 To k+1 X=k+2-1 A(X)=A(X)+A(X-1) If k＜n-1 Then Exit For Print A(X); Next 1 Next k
A．1 2 1
B．1 2 3
C．2 4 6
D．1 3 1
相关试题