Visual Basic 6类属性类型是否可以是枚举

Question

我正在研究一个旧的vb6应用程序(长篇故事,.NET Framework不可用).

我想知道,我可以将vb6 Class Property项声明为Enum吗？

例如

Public Enum WinInetPort
    INTERNET_INVALID_PORT_NUMBER = 0
    INTERNET_DEFAULT_FTP_PORT = 21
    INTERNET_DEFAULT_GOPHER_PORT = 70
    INTERNET_DEFAULT_HTTP_PORT = 80
    INTERNET_DEFAULT_HTTPS_PORT = 443
    INTERNET_DEFAULT_SOCKS_PORT = 1080
End Enum

课程模块:

Private m_Port As WinInetPort
Public Property Get Port() As WinInetPort
    Port = m_Port
End Property
Public Property Let Port(val As WinInetPort)
    m_Port = val
End Property

但是,我在编译时遇到错误

End Sub,End Function或End Property之后只能显示注释

该错误在类中的下一个Private语句中突出显示.

我在网上的某个地方读过vb6类不能公开公共常量 - 是否有解决方法？

谢谢

Answer 1

确保所有私有语句都放在属性声明之上.