问题详情

下列程序的功能是：输入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