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如何删除控件”这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，让大家可以学到更多知识，如果觉得文章不错，可以把它分享出去让更多的人看到吧！

当前标题：VB.NET如何删除控件
URL分享：http://bzwzjz.com/article/ijshsh.html