单项选择题

有如下程序：
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

<上一题目录下一题>

热门试题

单项选择题

编写如下事件过程： Private Sub Form KeyDown (KeyCode As Integer, Shift As Integer) Print Chr (KeyCode) End Sub Private Sub Form_KeyPress( KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，若按“T”键，则程序输出的结果是

A．T
T
B．t
T
C．T
t
D．t
t

单项选择题

窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub

A．10
B．14
C．15
D．120

相关试题