有如下VB程序段：PrivateSubCommandl_Click()Dimd(lTo6)AsIntegerDimtAsIntegerd(1)=35:d(2)=_刷题宝

题干

有如下VB 程序段：
Private Sub Commandl_Click()
Dim d(l To 6) As Integer
Dim t As Integer
d(1)=35:d(2)=18:d(3)=63:d(4)=5:d(5)=85:d(6)=47
For i=1 To 3

For j=i＋1 To 6

If d(j)<d(j-1) Then
t=d(j):d(j)=d(j-1):d(j-1)=t
End If

Next j

Textl.Text=Str(d(i))+Text1.Text
Next i
End Sub .
执行该程序段后，文本框 Textl输出的内容是（）

A．47 63 85

B．35 5 18

C．85 63 47

D．18 5 35

上一题下一题 0.99难度选择题更新时间:2020-03-31 08:08:24

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

同类题1

在VB中，下列程序段执行后，变量a、b的值分别是（）
a=5
b=3
If a>b Then

a=b

同类题2

按了回车键后，将组合框中输入的内容添加到组合框中，组合框的名称是COMBO1。
PRIVATE    SUB    COMBO1________1（KEYASCII AS   INTEGER）
IF  ________2
________3
END IF
END   SUB

同类题3

写出算法执行结果

同类题4

下列VB程序段的输出结果是
a=25:b=18:c=b
if a>b then
c=a
end if
print c

同类题5

某算法的部分流程图如图所示，执行这部分流程，输入n的值为5，则输出值依次为

相关知识点