单项选择题

有如下程序:
Private Sub Command1_Click( )
a$="A WORKER IS OVER THERE"
x=Len(a $)
For i=1 To x-1
b$=Mid $(a $,i,2)
If b $="ER"Then s=s+1
Next i
Pdnt s
End Sub
程序运行后的输出结果是

A.1
B.2
C.3
D.4
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(2,4,6,8) j=1 For i=4 To 1 Step-3 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果是
A.22
B.24
C.26
D.28
填空题
一般来说,算法可以用顺序、选择和 【1】 三种基本控制结构组合而成。
相关试题
  • 建立随机文件F1.DAT,存放职工姓名和编号...
  • 若s、i均为整型变量,执行下列程序段后s的...
  • 把窗体的KeyPreview属性设置为True,并编写...
  • 数据库系统在其内部分为三级模式,即概念模...
  • 标准模块和窗体模块的功能是计算和打印两个...