下列程序的功能是：输入10个整数 逆序后输出。请在程序空白处填入适当语句使程序完成指定的功能。Pr
程序,逆序,功能
已帮助 人
下列程序的功能是：输入10个整数，逆序后输出。请在程序空白处填入适当语句使程序完成指定的功能。
Private Sub Command2_Click()
Dim i, j, k,temp, arr(11) As lnteger
Dim result As String
For k=1 To 10
arr(k) =Val (InputBox("请输入第" & k & "个数："，"数据输入窗口"))
Next k
i=1
j = 10
Do
temp=arr(i)
arr(i)=arr(j)
arr(j)=temp
i=i+1
j=【12】
Loop While【13】
result =""
For k=1 To 10
result=result & arr(k) & Chr(13)
NeXt k
MsgBox result
End Sub
-
参考答案：【12】【答案】：j-1【知识点】：VBA程序中循环结构的循环变量的设计
【解析】：此程序的功能是实现10个整数的逆序，变量i从第1个数向后移动需要不断加1，变量j从第10个数向前移动需要不断减1，故此空应填j-1。【13】【答案】：i>j【知识点】：VBA程序中的循环结构
【解析】：此程序是用循环结构实现的，循环结束的条件是变量i和j从两边移到中间两个变量进行数据交换后，下次不再进行数据交换，此时变量i的值大于j的值，故此空应填i>j。