单项选择题

有如下程序：
Private Sub Command1_Click()
　　 a$="A WCIRKER 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 Case4 Print good Case 3 Print pass Case Else Print fail End Select

A．excellent
B．good
C．pass
D．fall

单项选择题

设Y是整形变量，能判断Y为奇数的表达式是

A．Not(y Mod 2 ＜＞ 0)
B．y Mod 2 ＜＞ 0
C．(y-1)Mod 2 ＜＞ 0
D．y Mod 2 ＜＞ 1

相关试题