求 高手》为什么一直显示无效字符？

--------------------编程问答-------------------- Option Base 1
_ '这个是啥意思？

Private Sub Form_Click()
Dim a(10) As Integer
Dim i As Integer
 For i = 1 To 10
      a(i) = Val(InputBox("输入值"))
Next i
 For i = 1 To 10
    Print a(i);
   Next i
For i = 1 To 10 \ 2
    t = a(i)
    a(i) = a(10 - i + 1)
    a(10 - i + 1) = t
    Next i
    Print
For i = 1 To 10
   Print a(i);
Next i

End Sub  --------------------编程问答--------------------

'下面是调试好的，没有问题

Option Base 1

Private Sub Form_Click()

    Dim a(10) As Integer

    Dim i As Integer, t As Integer

     For i = 1 To 10

          a(i) = Val(InputBox("ÊäÈëÖµ"))

    Next i

     For i = 1 To 10

        Print a(i);

       Next i

    For i = 1 To 10 \ 2

        t = a(i)

        a(i) = a(10 - i + 1)

        a(10 - i + 1) = t

        Next i

        Print

    For i = 1 To 10

       Print a(i);

    Next i



End Sub

--------------------编程问答-------------------- 如1楼所说，楼主这问题问得怪，按说你在VB中他马上会警告你那一行有问题的啊。

补充：VB ,  数据库(包含打印，安装，报表)