UC知道VB问题。请进
来源：百度知道 编辑：UC知道 时间：2024/09/21 20:22:03
Option Base 0
Private Sub Form_Click()
Dim a
Dim i As Integer
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
For i = 0 To 3
Print a(5 - i);
Next
End Sub
请问显示的结果是什么？
最好写一下没一步的解释，谢谢
Private Sub Form_Click()
Dim a
Dim i As Integer
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
For i = 0 To 3
Print a(5 - i);
Next
End Sub
请问显示的结果是什么？
最好写一下没一步的解释，谢谢
Option Base 0 'Option Base 语句指定下界
Private Sub Form_Click() '窗体单击事件
Dim a '定义一个变量a
Dim i As Integer '定义变量i为整数类型
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) '利用Array函数返回
For i = 0 To 3 'i从0 到3 循环
Print a(5 - i); '窗体打印a数组中的a(5-i)
Next
End Sub
Option Base 0 'Option Base 语句指定下界
Private Sub Form_Click() '窗体单击事件
Dim a '定义一个变量a
Dim i As Integer '定义变量i为整数类型
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) '利用Array函数返回数组（1，2，3，4，5，6，7，8，9）并将其赋值给a(数组下界为0，上界为8）
For i = 0 To 3 'i从0 到3 循环
Print a(5 - i); '窗体打印a数组中的a(5-i)
Next
'i=0 print a(5-i)=a(5)=6
'i=1 print a(5-i)=a(4)=5
，，，，，，
End Sub
最后结果是：
6
5
4
3
结果是输出：6，5，4，3
Option Base 0 'Option Base 语句指定下界
Private Sub Form_Click() '窗体单击事件
Dim a '定义一个数组a
Dim i As Integer '定义变量i为整数类型
a