（加试题）下列程序执行后文本框Text1显示的内容是（）s="ERROR:Divisormustnotbezero!"flag=False:m=0Fori=1T_刷题宝

题干

（加试题）下列程序执行后文本框Text1 显示的内容是（）
s = "ERROR:Divisor must not be zero!"
flag = False: m = 0
For i = 1 To Len(s)

ch = Mid(s, i, 1)

If ch >= "a" And ch <= "z" Then

If Not flag Then

m = m + 1

flag = True

End If

Else

flag = False

End If

Next i
Text1.Text=Str(m)

A．4

B．5

C．6

D．19

上一题下一题 0.99难度选择题更新时间:2019-04-06 11:23:27

答案(点此获取答案解析）

同类题1

下面的程序是求100以内奇数和S的值（S=1+3+5+7...+99），请把空缺的地方填写完整（填数字、变量名称、或者属性名称等）。
Private Sub Command1_Click()
Dim s As Integer
Dim i As Integer
s=（1）
For i = 1 to 100 Step （2）
s=s+i
Next （3）
Label1.（4）=Str(s)
End Sub
填空结果：
（1）________ （2）________ （3）________ （4）__________

同类题2

某算法的部分流程图如图所示，执行这部分流程后，变量s的值是

同类题3

以下程序段是一个完整的Visual Basic的Do语句，则划线处的语句应该是（）。
Do While a<=5
s=s+a : a=a+1
________________

同类题4

某算法的部分流程图如图所示。执行该流程后，“x≥y?”被执行的次数为（）

同类题5

某算法的部分流程图如下图所示。执行这部分流程，则输出 s 的值是（）

相关知识点