关于VB中过程的参数提示错误

'简单的测试程序
Private Sub Form_Load()
    Dim ii As Integer
    Dim ba(), bb() As Byte
    ReDim ba(9)
    ReDim bb(9)
    For ii = 0 To 9
        ba(ii) = 3 * ii + 2
    Next
    Call ttsub(ba(), bb())
End Sub

 
Private Sub ttsub(a() As Byte, b() As Byte)
    Dim aa As Byte
    For aa = 0 To 9
        b(aa) = a(aa) + 1
    Next
End Sub

 
 
调试时提示下述错误：
compile error:
type mismatch: array or user-defined type expected
 
错误指向Call ttsub(ba(), bb())一句中的ba()
 
请问这段程序哪儿错了？该怎么改？

答案：Dim ba(), bb() As Byte


这个是错误的.要写就写全,因为vb默认是变体Variant类型的.

所以千万不能马虎,得写Dim ba() As Byte, bb() As Byte

上一个：VB中value找不到数据成员或方法
下一个：求VB高手 通过拆分数据方法 实现我想表达的这样数据 请问如何实现？