单项选择题

有如下程序：
Private Sub Command1_Click()
as="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
<上一题 目录 下一题>
热门 试题

单项选择题
下列各种形式的循环中，输出“*”的个数最少的循环是
A．a=5:b=8
Do
Print" *"
a=a+1
Loop While a＜b
B．a=5:b=8
Do
Print" *"
a=a+1
Loop Until a＜b
C．a=5:b=8
Do Until a-b
Print "*"
b=b+1
Loop
D．a=5:b=8
Do Until a＞b
Print "*"
a=a+1
Loop
单项选择题
下列程序段的结果为 A = ABBACDDCBA For i=6 To 2 Step -2 X = Mid(A,i,i) Y=Left(A,i) Z=Right (A,i) Z=X & Y & Z Next Print Z
A．ABC
B．AABAAB
C．BBABBA
D．ABBABA
相关试题