久久久精品一区ed2k-女人被男人叉到高潮的视频-中文字幕乱码一区久久麻豆樱花-俄罗斯熟妇真实视频

vb.net動態(tài)添加代碼,vb 動態(tài)添加控件

vb.net 如何動態(tài)添加N個一樣的textbox控件?(馬上采納)

自己在窗體上加一個按鈕,以下是詳細代碼(整個類)

創(chuàng)新互聯(lián)成立10年來,這條路我們正越走越好,積累了技術與客戶資源,形成了良好的口碑。為客戶提供網站建設、成都網站制作、網站策劃、網頁設計、國際域名空間、網絡營銷、VI設計、網站改版、漏洞修補等服務。網站是否美觀、功能強大、用戶體驗好、性價比高、打開快等等,這些對于網站建設都非常重要,創(chuàng)新互聯(lián)通過對建站技術性的掌握、對創(chuàng)意設計的研究為客戶提供一站式互聯(lián)網解決方案,攜手廣大客戶,共同發(fā)展進步。

Public Class Form1

Private N As Integer '用來記添加要加入textbox的個數(shù)

Private PL As Integer = 10 'textbox相對于窗體的Left

Private PT As Integer = 10 'textbox相對于窗體的Top

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

Me.AutoScroll = True '窗體自動顯示滾動條

N = 10 '初始化N為10

For i = 1 To N

Dim newtextbox As New TextBox

newtextbox.Left = PL

newtextbox.Top = PT

Me.Controls.Add(newtextbox)

PT += newtextbox.Height + 10 '各 newtextbox上下間隔10-------PL不變是希望左對齊

Next

End Sub

End Class

vb.net動態(tài)添加控件問題

你還要把過程與控件事件綁定

AddHandler 控件.事件名,addressof 事件過程

RemoveHandler 這個是取消綁定

沒發(fā)現(xiàn)自動生存的事件過程后面還有一個Hander button1.Click之類的,這就是所謂事件句柄。反而跟過程名沒關系,改成阿貓阿狗也可以。

例外也可以像 Private WithEvents obj as ControlClass 這么聲明控件變量,估計像vb6那樣會在下拉列表中列出事件系列。

哎呀,說了半天跑題了。 ff不存在嘛多半不是它的作用域范圍內,應該把ff變量定義在類中,而不是類中的某個過程中。

最好把代碼添多一點,把ff部分也添出來看看。

VB.NET 用二維數(shù)組的方式動態(tài)加控制 例如在窗體上動態(tài)添加GroupBox,然后再在GroupBox里動態(tài)添加控件

下面這段代碼完成,在窗體上用語句添加2個 GroupBox控件,且在每個GroupBox控件中添加4個 RadioButton 控件。

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

Dim i As Integer

'添加2個GroupBox

Dim MyGroupBox(2) As GroupBox

For i = 1 To 2

'將一個GroupBox控件加入到Form上

MyGroupBox(i) = New GroupBox

Me.Controls.Add(MyGroupBox(i))

'設置該GroupBox控件的屬性

MyGroupBox(i).Height = 240

MyGroupBox(i).Width = 600

MyGroupBox(i).Top = (i - 1) * (240 + 20) + 20

MyGroupBox(i).Left = 20

'修改新加入控件的Text值

MyGroupBox(i).Text = "GroupBox" CStr(i)

Next

'每個GroupBox中添加4個單選按鈕

Dim MyRadioButton1(4) As RadioButton

Dim MyRadioButton2(4) As RadioButton

For i = 1 To 4

MyRadioButton1(i) = New RadioButton

Me.Controls.Add(MyRadioButton1(i))

MyRadioButton1(i).Parent = MyGroupBox(1)

'設置該GroupBox控件的屬性

MyRadioButton1(i).Height = 20

MyRadioButton1(i).Width = 120

MyRadioButton1(i).Top = (i - 1) * (20 + 20) + 40

MyRadioButton1(i).Left = 20

'修改新加入控件的Text值

MyRadioButton1(i).Text = "RadioButton1_" CStr(i)

Next

For i = 1 To 4

MyRadioButton2(i) = New RadioButton

Me.Controls.Add(MyRadioButton2(i))

MyRadioButton2(i).Parent = MyGroupBox(2)

'設置該GroupBox控件的屬性

MyRadioButton2(i).Height = 20

MyRadioButton2(i).Width = 120

MyRadioButton2(i).Top = (i - 1) * (20 + 20) + 40

MyRadioButton2(i).Left = 20

'修改新加入控件的Text值

MyRadioButton2(i).Text = "RadioButton2_" CStr(i)

Next

End Sub

分享文章:vb.net動態(tài)添加代碼,vb 動態(tài)添加控件
文章URL:http://sd-ha.com/article36/hcoisg.html

成都網站建設公司_創(chuàng)新互聯(lián),為您提供網站導航、定制網站虛擬主機、網站設計公司、營銷型網站建設、面包屑導航

廣告

聲明:本網站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)

成都網站建設公司