使用New關鍵字建立一個新的對象和用它屬的類來定義是一樣的。New關鍵字可以被用作來建立一個窗體、類模塊以及集合的實例。用戶在設計的時候建立的每一個窗體都是一個類。New關鍵字能夠用來建立一個類的實例。
可以通過以下步驟來建立一個類的實例:
(1)在窗體上畫一個按鈕和幾個其他的控件。
(2)按鈕的Click事件過程加入以下代碼:
Dim x AS New Form1
x.Show
(3)運行程序,並且點擊幾次按鈕,把最前面的窗體移開,因為窗體是一個有可視界面的類,此時可以看見有很多窗體的拷貝,每一個窗體具有相同的控件,並且出現在一個地方。
(4)將列代碼加到按鈕的click事件過程中:
Dim f As Form1
f=New Form1
f.text="hello"
f.Show
使用New關鍵字可以從類模塊中定義的類中建立一個新的集合和對象,要知道它們怎樣工作,可以參考下面的例子:
(1)建立一個新的工程,並且在一個名為Form1的窗體上畫一個按鈕控件。
(2)在Project(項目)菜單下,選擇"Add Class"給工程添加一個類
(3)把新的類命名為ShowMe.VB
(4)在該新類中加入如下代碼:
PUblic Class ShowMe Sub ShowFrm() Dim frmNew As Form1 frmNew=New Form1 frmNew.Show() frmNew.WindowState=1 End Sub End Class (5)在Button1_click事件的過程中加入如下代碼: Protected Sub Button1_Click(Byval sender As System.Object,_ Byval AS System.EventArgs) Dim clsNew As New ShowMe() clsNew.ShowFrm() End Sub
運行程序,並且點擊幾次按鈕,將看見每創建一個ShowMe類的新的實例時,在桌面上有一個最小化的窗體的圖標。
New關鍵字只能用來建立一個類的對象,不能建立一個基於基本的數據類型的對象,例如Integer。而且,不能建立一個基於一個具體對象的對象。例如,下面的代碼根據一個名為SomeClass的類,建立了一個名為Objx的對象,面後又錯誤地企圖根據對象Objx再建立一個其他的對象:
Dim Objx As New SomeClass()
Dim Objx AS New Objx()
以上代碼是非法的。