请高手指正这段代码是否有问题（VB数组问题）
各位大虾好啊，本人今天写了段VB代码，在VS的VB环境中运行，简单的用DO WHILE循环，检查了若干遍也没看出问题，调试也没报错，但却什么都不输出，实在不知道怎么回事啊，快救救我吧！！，多谢了啊，代码如下：
Dim numarry(2) As Integer
Dim temp As Integer
Do While numarry(2) = 0 '数组上限是0时保持循环
numarry(0) = numarry(0) + 1 '每循环一次在数组下限加1
For temp = 0 To 1 '每加1一次检查数组各元素是否满10
If numarry(temp) > 9 Then
numarry(temp) = 0
numarry(temp + 1) = numarry(temp + 1) + 1 '满10进位
End If
Next
Loop
For temp = 2 To 0 '输出结果
result.Text = result.Text & numarry(temp)
Next
按意图应该输出100，但运行后什么也不输出，救命吧！ VS VB 数组
[解决办法]
不可能吧？我copy你的代码，只加了Step -1，输出是100，没有错啊！在那一段下标越界？你是不是改了系统默认的上标？直接dim numarry(0 to 2) As Integer 试一下
