单项选择题

在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后编写如下事件过程：
Private Sub Commandl_Click()
S=0
Fori=1 To 15
x=2*i-1
If x Mod3=0 Thens=S+1
Nexti
Labe11.Caption=S
End Sub
程序运行后，单击命令按钮，则标签中显示的内容是( )。

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

单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dimarrayl(10，10)As Integer Dimi As Integer,j As Integer Fori=1 To 3 Forj=2 To 4 arrayl(i，j)=i+j Nextj Nexti Text1.Text=axvayl(2，3)+arrayl(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是( )。
A．15
B．14
C．13
D．12
单项选择题
建立一个新的标准模块，应该选择( )的“添加模块”命令。
A．“工程”菜单
B．“文件”菜单
C．“工具”菜单
D．“编辑”菜单
相关试题