有如下程序段：s＝“”Fori＝1To3Forj＝7Toi＋1Step－1Ifa(j)＜a(j－1)Thenk＝a(j)：a(j)＝a(j－1)：a(j－1)＝_刷题宝

题干

有如下程序段：
s＝“”
For i＝1 To 3
For j＝7 To i＋1 Step－1
If a(j)＜a(j－1) Then
k＝a(j)：a(j)＝a(j－1)：a(j－1)＝k
End If
Next j
s＝s＋Str(a(i))
Next i
Text1.Text＝s
数组元素a(1)到a(7)的数据依次为“3，9，1，5，8，6，2”，经过该程序段“加工”后，文本框Text1中显示的内容是( )

A．1 2 3	B．9 8 6
C．3 9 1	D．8 6 2

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

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

同类题1

下面程序执行的结果是（）
Private Sub Form_Load()
A="123":B="456"
C=Val(A)+Val(B)
Print C\100
End Sub

同类题2

在窗体上画一个命令按钮，其Name属性为Command1，然后编写如下代码：
Option Base 1
Private Sub Command1Click
Dim a(4,4)
For i = 1 To 3
For j = 1 To 3
a(i,j)=(i-1)*3+j
Next j
Next i
PRINT A（3，1）
End Sub
程序运行后，单击命令按钮，其输出结果为.

同类题3

为使左右框内的Visual Basic程序段实现相同的功能，可在左框内划线处填写的代码是：（）

同类题4

下列Visual Basic程序段运行后，变量x的值为（）
x="3:" y=50
Do while x < sqr(y)
x=x+2
Loop

同类题5

以下程序段执行后，整型变量a的值为（）。
a = 3
b = 5
b =" b" + a
a =" a" + b

相关知识点