public Type Record strName As string strNumber As Long End Type 象这样写 Public Orderreturn() As Orderexeresult Type Orderexeresult light_node As Integer exetime As String listnum As Integer ordertype As String End Type
MSDN:对象模块中的用户定义类型不能为 Public。这个错误的起因与解决方法如下所示: 试图在对象模块中定义 Public 用户自定义类型。 将用户自定义类型的定义移到标准模块中,然后在对象模块或其它模块中声明该类型的变量。若只是要在它出现的模块中使用该类型,可以在对象模块中放入 Type...End Type 定义,并在定义之前加上 Private 关键字。
public Type Record
strName As string
strNumber As Long
End Type
象这样写
Public Orderreturn() As Orderexeresult
Type Orderexeresult
light_node As Integer
exetime As String
listnum As Integer
ordertype As String
End Type
将用户自定义类型的定义移到标准模块中,然后在对象模块或其它模块中声明该类型的变量。若只是要在它出现的模块中使用该类型,可以在对象模块中放入 Type...End Type 定义,并在定义之前加上 Private 关键字。