VB.NET如何刪除控件

這篇文章給大家分享的是有關VB.NET如何刪除控件的內容。小編覺得挺實用的，因此分享給大家做個參考，一起跟隨小編過來看看吧。

當一個控件是另一個控件的子控件，例如pictruebox里面又有3個子pictruebox,子控件的名字存儲在已知的變量當中，而當我們想刪除其中任意控件的時候，可以使用如下方法來實現：
先看一段代碼：

控制控件狀態

Private Sub mHDR_Control_Status
(ByVal p_Enabled As Boolean)  
Dim iControls As Integer  
Dim i As Integer  
iControls = Me.gbxVoyage_HDR.
Controls.Count  
For i = 0 To iControls - 1  
If TypeOf (Me.gbxVoyage_HDR.
Controls(i)) Is TextBox Or _  
TypeOf (Me.gbxVoyage_HDR.Controls(i)) 
Is Infragistics.Win.Misc.UltraButton Then  
Me.gbxVoyage_HDR.Controls(i).
Enabled = p_Enabled 
End If  
Next  
dtpLoad_ETD.Enabled = p_Enabled 
If gLoad_Type = "0" Then  
btnSave.Enabled = p_Enabled 
btnEdit.Enabled = Not p_Enabled  
Else  
btnSave.Enabled = False 
btnEdit.Enabled = False 
End If  
txtVoyageNO.Enabled = False 
End Sub 

簡單來說，就是用Me.gbxVoyage_HDR.Controls(i))，如果控件里面還有控件，就再加Controls(i)來控制Me.gbxVoyage_HDR.Controls(i).Controls(i)。

回到先前的假設，pictruebox里面又有3個子pictruebox，對其中任意一個做刪除的主要代碼如下：

Public pics(1000) As System.
Windows.Forms.PictureBox  
dim pic1 as new New PictureBox  
dim pic2 as new New PictureBox  
dim pic3 as new New PictureBox  
dim j as integer=0 
dim Mainpic as new New PictureBox  
Mainpic .Controls.Add(pic1)  
pics(j)=pic1  
j+=1  
Mainpic .Controls.Add(pic2)  
pics(j)=pic2  
j+=1  
Mainpic .Controls.Add(pic3)  
pics(j)=pic3  
j+=1 

使用了控件數組，檔VB.NET刪除控件時，全部刪除的時候:Mainpic .Controls.Clear()

VB.NET刪除控件中第j個控件的時候：Mainpic .Controls.Remove(pics(j))

感謝各位的閱讀！關于“VB.NET如何刪除控件”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，讓大家可以學到更多知識，如果覺得文章不錯，可以把它分享出去讓更多的人看到吧！