<del id="d4fwx"><form id="d4fwx"></form></del>
      <del id="d4fwx"><form id="d4fwx"></form></del><del id="d4fwx"><form id="d4fwx"></form></del>

            <code id="d4fwx"><abbr id="d4fwx"></abbr></code>
          • vb.net動態(tài)窗體 vb窗體控件

            VB.NET中,如何動態(tài)創(chuàng)建非模態(tài)窗體,類似于QQ一樣,雙擊一個頭像會彈出一個窗口。

            做一個窗體模板,假設(shè)是Form2

            成都創(chuàng)新互聯(lián)公司專注于網(wǎng)站建設(shè),為客戶提供成都做網(wǎng)站、成都網(wǎng)站制作、網(wǎng)頁設(shè)計開發(fā)服務(wù),多年建網(wǎng)站服務(wù)經(jīng)驗,各類網(wǎng)站都可以開發(fā),品牌網(wǎng)站設(shè)計,公司官網(wǎng),公司展示網(wǎng)站,網(wǎng)站設(shè)計,建網(wǎng)站費用,建網(wǎng)站多少錢,價格優(yōu)惠,收費合理。

            Dim x as New Form2

            x.Show()

            如果彈出窗口較多,x可以用動態(tài)數(shù)組替代

            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))

            '設(shè)置該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)

            '設(shè)置該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)

            '設(shè)置該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如何實現(xiàn)點擊不同控件分別調(diào)用相同子窗體,以控件名稱動態(tài)命名子窗體名稱

            1,添加一個模塊,在模塊里聲明一個全局公共變量N;

            2,在控件的調(diào)用窗體代碼段里,把此控件名稱給這個全局公共變量N賦值;

            3,在窗體的Load()事件里,寫代碼: Me.Text = N。

            分享名稱:vb.net動態(tài)窗體 vb窗體控件
            網(wǎng)頁鏈接:http://www.jbt999.com/article40/doochho.html

            成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站收錄、網(wǎng)站導(dǎo)航、品牌網(wǎng)站設(shè)計、響應(yīng)式網(wǎng)站、面包屑導(dǎo)航軟件開發(fā)

            廣告

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

            h5響應(yīng)式網(wǎng)站建設(shè)

              <del id="d4fwx"><form id="d4fwx"></form></del>
              <del id="d4fwx"><form id="d4fwx"></form></del><del id="d4fwx"><form id="d4fwx"></form></del>

                    <code id="d4fwx"><abbr id="d4fwx"></abbr></code>
                  • 国产18第一无限资源网站 | 天天狠天天干 | 欧日成人网站 | 亚洲日韩一区二区 | 欧美三级韩国三级日本三级在线观看 |