单项选择题

有如下程序：

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
单项选择题
编写如下事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode) End Sub Private SubForm_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住“Shift”键和锁定大写键时) 运行程序，若按“T”键，则程序输出的结果是
A．T

T

B．t

T

C．T

T

D．t

t
相关试题