以下代码进行编译时总是弹出提示“类型不匹配，缺少数组或用户定义类型”
Private Type PaiType    '定义一个结构体为PaiType
    PaiZhi As Integer
    PaiHua As Integer
    Pai As Integer
End Type

Private Sub Form_Load()
    Dim Pais(52) As PaiType    '定义了52个结构数组元素用作牌信息
    Call XiPaiGuoCheng(Pais)    ’执行洗牌过程--实参为结构数组名
End Sub

Private Sub XiPaiGuoCheng(Pais_c() As PaiType)   '定义洗牌过程--形参为区别实参在结构数名后加了“_c”
……
……
……
End Sub

试过用Public将结构体公有化，但还是不行！