2017-06-16 37 views
0

我想通過按下一個按鈕來添加一個TabControl標籤:VB:添加對象,該doiesnt一個TabControl標籤存在在這個時候

Dim inp As String 
    inp = TextBox6.Text 
    TabControl2.TabPages.Add(inp) 

,當我打開這個標籤頁一些對象應該等已創建一個按鈕和一個文本框等 我還沒有發現任何類型的標籤頁的onload事件,所以我試圖用補充一點:

TabPage8.Controls.Add(New Button()) 

tabpage8將成爲新創建的標籤頁的VB的,但像已經告知自己的姓名我,我不能將對象添加到不存在的標籤頁那時候。

有沒有什麼辦法可以做到這一點,或者你有任何其他想法可以幫助我嗎?

回答

1

您的密碼已關閉。請嘗試以下操作:

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
     TabControl2.TabPages.Add("Test") 
     Dim tp = TabControl2.TabPages(TabControl2.TabPages.Count - 1) 
     Dim b = New Button() 
     b.Text = "My Button" 
     tp.Controls.Add(b) 

     AddHandler b.Click, AddressOf MyButton_Click 
    End Sub 

    Private Sub MyButton_Click(sender As Object, e As EventArgs) 
     MessageBox.Show("MyButton clicked") 
    End Sub 

此代碼抓取最後添加的頁面並向其添加按鈕。它還根據需要配置按鈕並添加事件處理程序。

+0

感謝您的快速響應 - 但我怎樣才能編輯這個新創建的按鈕?我的意思是我可以在哪裏指定按鈕必須做什麼,當我按下它? – Kitsune

+0

我將修改代碼以向您展示如何。 –

相關問題