可以將Visual Basic 6類屬性類型作爲Enum

我正在研究一箇舊的vb6應用程序（長篇故事，.NET Framework不可用）。可以將Visual Basic 6類屬性類型作爲Enum

我想知道，我可以聲明一個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

但是，我編譯

只有意見可以結束子，端功能後出現，或高端物業

時會出錯該錯誤在班級中的下一個私人陳述中突出顯示。

我讀過網上的某個地方vb6類不能暴露公共常量 - 有沒有解決方法？

謝謝

來源

2012-04-14 Ben

你得到的錯誤與事實沒有關係，使用枚舉在VB6中有一些限制。你只是在某個地方犯了一個錯字。 – Dabblernl 2012-04-14 12:47:25

對於我來說，無論是在課堂上還是在模塊中聲明的枚舉，你所擁有的都是完美無缺的，這個問題必須存在於其他地方。 – 2012-04-14 12:47:41

嘗試在端口後添加另一個屬性，然後運行代碼。如果我在類中的Port Property之後什麼都沒有，那麼它將工作，如果我在Port屬性之後定義了其他一些屬性，則會出現錯誤。 – Ben 2012-04-14 12:53:50

而不只是給你一個-1，真正的編碼器將有所幫助。

確保您的所有私人聲明都位於屬性聲明之上。

來源

2012-04-14 13:14:06

可以將Visual Basic 6類屬性類型作爲Enum

回答

相關問題