Option Explicit
Private Type dataTy  '定义数据存放的结构体
  
    Id As Integer
    X As Double
    Y As Double
    Z As Double
    
    Pter As String
    Cmd As String
  
End Type
Public Function dataUp(tempUpId As Integer, dataUpEntity As dataTy)    
    dataArr(tempUpId - 1) = dataUpEntity
    
    
End Function总是报下面的错误,求指教
Private Enum 类型和用户定义类型不能作为公共过程的参数或返回类型、公共数据成员、或公共用户定义类型
   Public 过程在工程内的所有模块中都是可见的,而 Private Enum 类型在其模块以外不可见。这个错误的原因与解决方法如下所示: Public 过程是在一个 Public 类中,但它的返回值或某一参数却是在一个标准模块或 Private 类中定义。 
请将其声明为 Enum Public。它必须处于一个类模块中详细信息,请选择有问题的项目,并按下 F1 键。