单项选择题

有如下程序：

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
<上一题 目录 下一题>
热门 试题

单项选择题
下面程序段执行结果为 x=Int(Rnd() +4) Select Case x Case 5 Print excellent Case 4 Print good Case 3 Print pass Case Else Print fail End Select
A．excellent
B．good
C．pass
D．fall
单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 2 x=x+6 Next Next Print x End Sub 程序运行后，单击命令按钮，输出结果是
A．12
B．13
C．16
D．17
相关试题