VB.NET如何删除控件

这篇文章给大家分享的是有关VB.NET如何删除控件的内容。小编觉得挺实用的,因此分享给大家做个参考,一起跟随小编过来看看吧。

网站建设哪家好,找创新互联建站!专注于网页设计、网站建设、微信开发、成都微信小程序、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了大关免费建站欢迎大家使用!

当一个控件是另一个控件的子控件,例如pictruebox里面又有3个子pictruebox,子控件的名字存储在已知的变量当中,而当我们想删除其中任意控件的时候,可以使用如下方法来实现:
先看一段代码:

控制控件状态

  1. Private Sub mHDR_Control_Status
    (ByVal p_Enabled As Boolean)  

  2. Dim iControls As Integer  

  3. Dim i As Integer  

  4. iControls = Me.gbxVoyage_HDR.
    Controls.Count  

  5. For i = 0 To iControls - 1  

  6. If TypeOf (Me.gbxVoyage_HDR.
    Controls(i)) Is TextBox Or _  

  7. TypeOf (Me.gbxVoyage_HDR.Controls(i)) 
    Is Infragistics.Win.Misc.UltraButton Then  

  8. Me.gbxVoyage_HDR.Controls(i).
    Enabled = p_Enabled 

  9. End If  

  10. Next  

  11. dtpLoad_ETD.Enabled = p_Enabled 

  12. If gLoad_Type = "0" Then  

  13. btnSave.Enabled = p_Enabled 

  14. btnEdit.Enabled = Not p_Enabled  

  15. Else  

  16. btnSave.Enabled = False 

  17. btnEdit.Enabled = False 

  18. End If  

  19. txtVoyageNO.Enabled = False 

  20. End Sub 

简单来说,就是用Me.gbxVoyage_HDR.Controls(i)),如果控件里面还有控件,就再加Controls(i)来控制Me.gbxVoyage_HDR.Controls(i).Controls(i)。

回到先前的假设,pictruebox里面又有3个子pictruebox,对其中任意一个做删除的主要代码如下:

  1. Public pics(1000) As System.
    Windows.Forms.PictureBox  

  2. dim pic1 as new New PictureBox  

  3. dim pic2 as new New PictureBox  

  4. dim pic3 as new New PictureBox  

  5. dim j as integer=0 

  6. dim Mainpic as new New PictureBox  

  7. Mainpic .Controls.Add(pic1)  

  8. pics(j)=pic1  

  9. j+=1  

  10. Mainpic .Controls.Add(pic2)  

  11. pics(j)=pic2  

  12. j+=1  

  13. Mainpic .Controls.Add(pic3)  

  14. pics(j)=pic3  

  15. j+=1 

使用了控件数组,档VB.NET删除控件时,全部删除的时候:Mainpic .Controls.Clear()

VB.NET删除控件中第j个控件的时候:Mainpic .Controls.Remove(pics(j))

感谢各位的阅读!关于“VB.NET如何删除控件”这篇文章就分享到这里了,希望以上内容可以对大家有一定的帮助,让大家可以学到更多知识,如果觉得文章不错,可以把它分享出去让更多的人看到吧!


网页标题:VB.NET如何删除控件
文章URL:http://myzitong.com/article/ijshsh.html