3 回答

TA貢獻1817條經驗 獲得超14個贊
使用“模塊”而不是類,并且只使用“公共”而不是舊的“全局”關鍵字,就可以像以前一樣使用相同的方式:
Public Module Module1
Public Foo As Integer
End Module

TA貢獻1815條經驗 獲得超6個贊
好的。我終于找到了實際可行的方法來回答似乎要問的問題。
“當需要許多模塊和表單時,如何聲明一個變量對所有模塊都是公共的,以便它們各自引用相同的變量?”
令我驚訝的是,我花了相當多的時間在網絡上尋找這個看似簡單的問題,除了模糊不清之外,什么都讓我仍然遇到錯誤。
但是,由于科迪·格雷(Cody Gray)舉了一個例子,我得以辨別出正確的答案。
形勢 ; 您有多個模塊和/或表單,并且希望從每個或全部中引用特定的變量。
一種有效的方式;在一個模塊上放置以下代碼(其中“ DefineGlobals”是任意選擇的名稱);
Public Module DefineGlobals
Public Parts As Integer 'Assembled-particle count
Public FirstPrtAff As Long 'Addr into Link List
End Module
然后在需要尋址該變量“ Parts”的每個模塊/表單中,放置以下代碼(作為“ InitForm2”表單的示例);
Public Class InitForm2
Private Sub InitForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Parts = Parts + 3
End Sub
End Class
也許還有另一種形式;公開課FormX
Sub CreateAff()
Parts = 1000
End Sub
End Class
這種類型的編碼似乎已經在我的VB2008 Express上運行了,并且目前似乎全部都需要(沒有在后臺加載任何未知文件),即使我發現“哦……”也沒完沒了細節。我敢肯定,更高程度的標準化將是可取的,但是首要任務是簡單地使所有東西都可以工作,無論有沒有標準。
沒有什么比精確而措辭明確的例子更好。
- 3 回答
- 0 關注
- 1806 瀏覽
添加回答
舉報