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

时间:2012-04-14 11:45:27

标签: class vb6

我正在开发一个旧的vb6应用程序(很长一段时间,.NET Framework不可用)。

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

e.g。

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

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

  

在“结束子”,“结束功能”或“结束属性”

之后,只能显示注释

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

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

由于

1 个答案:

答案 0 :(得分:5)

确保所有私人陈述都放在属性声明之上。