Question

VB6.0 输入如下代码，显示 编译错误：成员标识符已存在于导出此对象模块的对象模块中 求解决方法

Private Type point
pn As String
X As Double
Y As Double
Z As Double
End Type

Public E As Double
Public F As Double
Public e2 As Double
Public i As Integer

Public BLH() As point
Public XYZ() As point
Public xyH() As point

Answer 1

Private Type point
pn As String
X As Double
Y As Double
Z As Double
End Type
在某个模块里定义过吗？

改成以下试试？？

Public Type point
pn As String
X As Double
Y As Double
Z As Double
End Type

追问

没有在其他模块里定义过

如果改为public type
则提示 编译错误：在私有对象模块中不能定义public的用户定义类型

追答

你在模块里写的还是在class里写的啊。
没法判断你的问题了。