Visual Basic 6中，类的属性类型能否使用枚举类型？

本文共计227个文字，预计阅读时间需要1分钟。

我正在研究一个旧的VB6应用程序（由于长篇故事和.NET Framework不可用）。我想知道，我能否将VB6中的Class Property声明为Enum？例如：Public Enum WinInetPort INTERNET_INVALID_PORT_NUMBER=0, INTERNET_DEFAULT_FTP_PORT=... End Enum

我正在研究一个旧的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

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

Only comments may appear after End Sub, End Function, or End Property

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

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

谢谢

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