题目内容
下列程序的功能是:单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组,然后把数组反序存放,再输出。 Option Base 1 Private Sub Form_Click() Dim a(20) As Integer,i As Integer Dim t As Integer,j As Integer Randomize For i=1 To 20 a(i)=10+Int(90*Rnd) Print a(i); Next i Print i=1:【 】 Do While i<j t=a(i):【 】:a(i)=t i=i+1:j=j-1 Loop For i=1 To 20 Print a(i); Next i Print End Sub
查看答案
搜索结果不匹配?点我反馈