日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
VB.NET刪除控件具體應(yīng)用技巧分享

VB.NET開發(fā)平臺(tái)中擁有很多的控件。這些控件都有其特定的功能，幫助我們實(shí)現(xiàn)各種功能需求。不過有時(shí)也需要對(duì)一個(gè)控件進(jìn)行刪除，那么實(shí)際操作方法應(yīng)當(dāng)如何實(shí)現(xiàn)。下面就來(lái)看看VB.NET刪除控件的相關(guān)操作技巧。

10年的蒙自網(wǎng)站建設(shè)經(jīng)驗(yàn)，針對(duì)設(shè)計(jì)、前端、開發(fā)、售后、文案、推廣等六對(duì)一服務(wù)，響應(yīng)快，48小時(shí)及時(shí)工作處理。全網(wǎng)營(yíng)銷推廣的優(yōu)勢(shì)是能夠根據(jù)用戶設(shè)備顯示端的尺寸不同，自動(dòng)調(diào)整蒙自建站的顯示方式，使網(wǎng)站能夠適用不同顯示終端，在瀏覽器中調(diào)整網(wǎng)站的寬度，無(wú)論在任何一種瀏覽器上瀏覽網(wǎng)站，都能展現(xiàn)優(yōu)雅布局與設(shè)計(jì)，從而大程度地提升瀏覽體驗(yàn)。創(chuàng)新互聯(lián)從事“蒙自網(wǎng)站設(shè)計(jì)”,“蒙自網(wǎng)站推廣”以來(lái)，每個(gè)客戶項(xiàng)目都認(rèn)真落實(shí)執(zhí)行。

當(dāng)一個(gè)控件是另一個(gè)控件的子控件，例如pictruebox里面又有3個(gè)子pictruebox,子控件的名字存儲(chǔ)在已知的變量當(dāng)中，而當(dāng)我們想刪除其中任意控件的時(shí)候，可以使用如下方法來(lái)實(shí)現(xiàn)：
先看一段代碼：

控制控件狀態(tài)

 
 
 
    
  
  
  
  1. Private Sub mHDR_Control_Status
    (ByVal p_Enabled As Boolean)  
    2.   
  
  
  2. Dim iControls As Integer  
    3.   
  
  
  3. Dim i As Integer  
    4.   
  
  
  4. iControls = Me.gbxVoyage_HDR.
    Controls.Count  
    5.   
  
  
  5. For i = 0 To iControls - 1  
    6.   
  
  
  6. If TypeOf (Me.gbxVoyage_HDR.
    Controls(i)) Is TextBox Or _  
    7.   
  
  
  7. TypeOf (Me.gbxVoyage_HDR.Controls(i)) 
    Is Infragistics.Win.Misc.UltraButton Then  
    8.   
  
  
  8. Me.gbxVoyage_HDR.Controls(i).
    Enabled = p_Enabled 
    9.   
  
  
  9. End If  
    10.   
  
  
  10. Next  
    11.   
  
  
  11. dtpLoad_ETD.Enabled = p_Enabled 
    12.   
  
  
  12. If gLoad_Type = "0" Then  
    13.   
  
  
  13. btnSave.Enabled = p_Enabled 
    14.   
  
  
  14. btnEdit.Enabled = Not p_Enabled  
    15.   
  
  
  15. Else  
    16.   
  
  
  16. btnSave.Enabled = False 
    17.   
  
  
  17. btnEdit.Enabled = False 
    18.   
  
  
  18. End If  
    19.   
  
  
  19. txtVoyageNO.Enabled = False 
    20.   
  
  
  20. End Sub 
    21.

簡(jiǎn)單來(lái)說(shuō)，就是用Me.gbxVoyage_HDR.Controls(i))，如果控件里面還有控件，就再加Controls(i)來(lái)控制Me.gbxVoyage_HDR.Controls(i).Controls(i)。

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

 
 
 
    
  
  
  
  1. Public pics(1000) As System.
    Windows.Forms.PictureBox  
    2.   
  
  
  2. dim pic1 as new New PictureBox  
    3.   
  
  
  3. dim pic2 as new New PictureBox  
    4.   
  
  
  4. dim pic3 as new New PictureBox  
    5.   
  
  
  5. dim j as integer=0 
    6.   
  
  
  6. dim Mainpic as new New PictureBox  
    7.   
  
  
  7. Mainpic .Controls.Add(pic1)  
    8.   
  
  
  8. pics(j)=pic1  
    9.   
  
  
  9. j+=1  
    10.   
  
  
  10. Mainpic .Controls.Add(pic2)  
    11.   
  
  
  11. pics(j)=pic2  
    12.   
  
  
  12. j+=1  
    13.   
  
  
  13. Mainpic .Controls.Add(pic3)  
    14.   
  
  
  14. pics(j)=pic3  
    15.   
  
  
  15. j+=1 
    16.

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

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


標(biāo)題名稱：VB.NET刪除控件具體應(yīng)用技巧分享
瀏覽地址：http://m.5511xx.com/article/djiejog.html