某VisualBasic程序段如下：s=""Fori=1To5a(i)=0NextiFori=2To5Forj=iTo5IfjModi=0Thena(j)=1-_刷题宝

题干

某Visual Basic程序段如下：
s = ""
For i = 1 To 5
a(i) = 0
Next i
For i = 2 To 5
For j = i To 5
If j Mod i = 0 Then a(j) = 1 - a(j)
Next j
Next i
For i = 1 To 5
If a(i) = 1 Then s = s + Str(i)
Next i
Text1.Text = s
运行该程序段后，Text1中显示的内容为（）

A．14

B．235

C．25

D．234

上一题下一题 0.99难度选择题更新时间:2017-03-28 03:01:07

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

同类题1

对应的VB表达式是（）。

A．a + b / c - d	B．(a + b) / c - d
C．a + b / (c - d)	D．(a + b) / (c - d)

同类题2

计算机能直接识别的算法表示形式是（）

A．自然语言

D．程序语言

同类题3

对应的Visual Basic表达式是（）

A．(5x-4*y)/7z+x*x

B．(5x-4*y)/(7z+x*x)

C．(5*x-4*y)/(7*z+x*x)

D．5*x-4*y/7z+x*x

同类题4

函数len(“2008奥运”)返回的值是（）。

同类题5

有如下Visual Basic程序，输入n的值为11.在调试时程序首先出现的错误是（）
Private Sub Command1_Click
Dim n As Integer
Dim a(1 To 10) As Integer
n=Val(Text1.Text)
s=1
For i =" 1" To n
s =" s" * i
a(i) = s
List1.AddItem Str(a(i))
Next i
End Sub

A．	B．
C．	D．

相关知识点