【单选题】从键盘中输入10个,请按从小到大排序,请将下列程序填写完整: dim a(1 to 10) as integer for i=1 to 10 a(i)=inputbox("请将输入第"&str(i)&"个数“ next i for i=1 to 9 for j= to 10 if a(k)>a(j) then end if next j if ik then temp=a(i) end if...
【单选题】下列程序在运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dim x For i = 1 To 10 x(i) = 10 - i + 1 Next i For i = 10 To 1 Step -2 Print x(i) Next i End Sub
【简答题】写输出下面程序的运行结果 _ _。 Dim a() As Integer Private Sub Command1_Click() ReDim a(1 To 5) For i = 1 To 5 a(i) = i Next i ReDim a(1 To 10) For i = 6 To 10 a(i) = 2 * i Next i For i = 1 To 10 Print a(i); Next i...