题型:综合题 题类:常考题 难易度:普通
浙江省高中信息技术——循环与数组
例如,长度为6的有序序列:38、42、59、61、69、78,当t=2时重排结果为:59、61、69、78、38、42。
小红编写了VB程序功能如下:程序运行时产生n个整数存储在数组a中,在文本框Text1中输入t,单击“对调”按钮Command1在列表框List2中输出t个数与n-t个数对调后的数字序列。程序运行界面如图所示。
为了实现上述功能,请在划线处填入合适的代码。
Const n = 10
Dim a (1 To 10) As Integer
Private Sub Form Load ( )
‘生成n个有序数 ,显示在List1中
‘代码略
End Sub
Private Sub Command1_ Click ( )
Dim t As Integer, i As Integer, j As Integer
Dim temp As Integer
①
For i=t+1 To n
Temp = a(i)
For j = i To i+1-t step -1
②
Next j
a(j)= ③
Next i
For i=1 To n
List2 AddItem Str(a(i))
Next i
End Sub
① ② ③
试题篮