单项选择题

有如下程序：

Private Sub Command1_Click()

a$="A WORKER IS HERE"

x=Len(a$)

For i=1 To x-1

b$=Mid$(a$，i，3)

If b$="WOR"，Then S=S+1

Next

Print S

End Sub

单击命令按钮，程序运行结果为

A．1
B．2
C．3
D．5

<上一题目录下一题>

热门试题

填空题

测试的目的是暴露错误，评价程序的可靠性，而______的目的是发现错误的位置并改正错误。

单项选择题

18所列的菜单结构。表2.18 标题名称层次显示大图标小图标 apper bigicon smallicon 1(主菜单) 2(子菜单) 2(子菜单) 要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“√”。以下正确的事件过程是

A．Private Sub bigicon_Click()

bigicon.Checked=False

End Sub

B．Private Sub bigicon_Click()

Me.appear.bigicon.Checked=True

End Sub

C．Private Sub bigicon_Click()

bigicon.Checked=True

End Sub

D．Private Sub bigicon_Click()

appear.bigicon.Checked=True

End Sub

相关试题