单项选择题

有如下程序：
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
相关试题