如何在vb.net里面動態(tài)添加控件

Private WithEvents NewTextBox As TextBox

讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務(wù)項目有：域名申請、網(wǎng)頁空間、營銷軟件、網(wǎng)站建設(shè)、景縣網(wǎng)站維護、網(wǎng)站推廣。

'通過使用WithEvents關(guān)鍵字聲明一個對象變量為新的命令按鈕

Private Sub Command1_Click()

If NewTextBox Is Nothing Then

Set NewTextBox = Controls.Add("VB.TextBox", "cmdNew", Form1)

NewTextBox.Move 200, 200

NewTextBox.Width = Form1.Width - 450

NewTextBox.Height = Form1.Height - 1400

NewTextBox.Visible = True

End If

End Sub

Private Sub Command2_Click()

If NewTextBox Is Nothing Then

Exit Sub

Else

Controls.Remove NewTextBox

Set NewTextBox = Nothing

End If

End Sub

如何在VB.NET中使用動態(tài)屬性

　Visual Basic .NET支持動態(tài)屬性，其動態(tài)屬性儲存在一個應(yīng)用程序配置文件中，該文件在應(yīng)用程序執(zhí)行時將會被讀到。使用動態(tài)屬性可以在不重新編譯應(yīng)用程序的情況下改變一些屬性值。你可以使用它們保存數(shù)據(jù)庫連接字符串、應(yīng)用程序日志信息或者服務(wù)器連接信息。

要看動態(tài)屬性的例子，首先在Visual Basic中創(chuàng)建一個Windows應(yīng)用程序。添加一個TextBox到默認窗體中；確認TextBox是被選中的，然后在屬性窗口中定位Dynamic屬性。

點擊Advanced標簽旁邊的省略號按鈕，打開一個對話框，該對話框中列出了TextBox所有的屬性，選擇Text屬性，鍵映射框?qū)患せ?。鍵映射決定了鍵儲存在配置文件中的值。點擊確定關(guān)閉對話框。

vb.net怎么讓Tabcontrol的選項卡能夠動態(tài)的添加或刪除，并且添加后與前一個選項卡的樣式一樣？

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

TabControl1.TabPages.Add("aa") /添加一個選項卡

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TabControl1.TabPages.RemoveAt(2) /刪除第二個的選項卡

End Sub

vb.net中tabcontral動態(tài)增加tage，怎么讓新增加的page優(yōu)先顯示，總之就是一直默認顯示新增加的頁。

TabControl1.TabPages.Add("NEW")

Dim ttl As Integer = TabControl1.TabPages.Count

TabControl1.SelectedIndex = ttl - 1

vb如何在運行過程中動態(tài)的創(chuàng)建按鈕，標簽，文本框等對象？

添加動態(tài)按鈕，及關(guān)聯(lián)按鈕事件的方法如下

----------------------

' 聲明對象

Dim newButton As New System.Windows.Forms.Button

' 預(yù)設(shè)對象

With newButton

.Name = [按鈕控件名稱]

.Text = [按鈕顯示內(nèi)容]

.Location = New Point([x位置], [y位置])

.Size = New System.Drawing.Size([控件寬], [控件高])

.FlatStyle = FlatStyle.Standard

End With

' 生成添加對象

Controls.Add(newButton)

' 相關(guān)事件鏈接

AddHandler newButton.Click, AddressOf myButtonHandler_Click

----------------------

若為標簽，則 首行對象為System.Windows.Forms.Label

若為文本框，則 首行對象為System.Windows.Forms.TextBox

如果要處理其他事件，自己在[相關(guān)事件鏈接]部分添加鏈接就可以了

舉著例子如TextBox的TextChanged事件

AddHandler newTextBox.TextChanged, AddressOf myTextBox_TextChanged

AddHandler 后為事件對象， AddressOf 后為為事件對象分配的名稱

這樣在處理事件是，就可以用名稱操作

Private Sub myTextBox_TextChanged(ByVal sender As Object, ByVal e As EventArgs)

...

End Sub