4

我正在开发一个旧的 vb6 应用程序（长话短说，.NET Framework 不可用）。

我想知道，我可以将 vb6 类属性项声明为枚举吗？

例如

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 类不能公开公共常量 - 有解决方法吗？

谢谢

4

1 回答 1

5

确保您的所有 Private 声明都放在 Property 声明之上。

于 2012-04-14T13:14:06.557 回答