VB.NET删除控件具体应用技巧分享

VB.NET开发平台中拥有很多的控件。这些控件都有其特定的功能,帮助我们实现各种功能需求。不过有时也需要对一个控件进行删除,那么实际操作方法应当如何实现。下面就来看看VB.NET删除控件的相关操作技巧。

10年的蒙自网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。全网营销推广的优势是能够根据用户设备显示端的尺寸不同,自动调整蒙自建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。创新互联从事“蒙自网站设计”,“蒙自网站推广”以来,每个客户项目都认真落实执行。

当一个控件是另一个控件的子控件,例如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删除控件具体应用技巧分享
URL网址:http://www.mswzjz.cn/qtweb/news39/58589.html

攀枝花网站建设、攀枝花网站运维推广公司-贝锐智能,是专注品牌与效果的网络营销公司;服务项目有等

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 贝锐智能