[填空题] 在窗体上画一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Cliek()Dim arr()As IntegerRe Dim arr(3)For

[填空题] 在窗体上画一个命令按钮Command1，然后编写如下程序：

Private Sub Command1_Cliek()

Dim arr()As Integer

Re Dim arr(3)

For i=0 To 3

arr(i)=i

Next i

x=InputBox("请输入一个数字：")

IfVal(x)＞4 Then

Rc Dim arr(4)

arr(4)=x

End If

Me.Print(arr(4)-arr(3))

End Sub

程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为 【10】 。