单项选择题

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

<上一题目录下一题>

热门试题

单项选择题

当双击窗体Form1时，要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程，正确的是( )。

A． Private Sub Form _ Db1Click( )　　　　Forml．Hide　　　　Form2．Show 0　　End Sub
B． Private Sub Form _ Db1Click( )　　　　Form１．Hide　　　　Form 2．Show 1　　End Sub　
C． Private　Sub　Form　_　Click( )　　　　Form l．Hide　　　　Form 2．Show　　End Sub
D． Private Sub Form _ Dbl Click( )　　　　Form l．Enabled=False　　　　Form 2．Enabled=True　　End Sub

单项选择题

设有下面的循环：i=1Doi=i + 3Print iLoop Until I＞_________程序运行后要执行3次循环体，则条件中I的最小值为（）。

A．k％=10Dim Arr(k)
B．Const k％=10Dim Arr(k)
C．Dim Arrl(10) As IntegerDim Arr2(10)
D．Dim Arrl(1 To 10)Dim Arr2(1 To 10，2 To 11)

相关试题