vb.net代碼創(chuàng)建控件 vbnet控件開發(fā)

VB怎么用代碼創(chuàng)建控件數(shù)組？

先定義一個(gè)控件(Option1)，然后修改index值為0 ,就創(chuàng)建了控件數(shù)組，設(shè)置你要?jiǎng)?chuàng)建控件數(shù)組的其它屬性.\x0d\x0aPrivate Sub Form_Load()\x0d\x0a Dim i%\x0d\x0a For i = 1 To 3\x0d\x0a Load Option1(i) 這句是關(guān)鍵,,,,,\x0d\x0a Option1(i).Top = Option1(0).Top\x0d\x0a Option1(i).Left = Option1(i - 1).Left + Option1(i - 1).Width + 200\x0d\x0a Option1(i).Visible = True\x0d\x0a Next\x0d\x0a Option1(0).Caption = "10"\x0d\x0a Option1(1).Caption = "15"\x0d\x0a Option1(2).Caption = "20"\x0d\x0a Option1(3).Caption = "30"\x0d\x0a End Sub\x0d\x0a\x0d\x0aPrivate Sub Option1_Click(Index As Integer)\x0d\x0a Text1.FontSize = Val(Option1(Index).Caption)\x0d\x0aEnd Sub

我們提供的服務(wù)有：網(wǎng)站設(shè)計(jì)、做網(wǎng)站、微信公眾號(hào)開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、王屋ssl等。為上千余家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的王屋網(wǎng)站制作公司

vb.net用代碼創(chuàng)建label控件

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim Label1 As New Label

Label1.Location = New System.Drawing.Point(8, 8) '括號(hào)中寫左邊距和上邊距

Label1.Name = "Label1"

Label1.AutoSize = True

Label1.TabIndex = 1

Label1.Text = "運(yùn)輸"

Label1.Visible = True

Me.Controls.Add(Label1)

End Sub

VB.NET中如何動(dòng)態(tài)創(chuàng)建控件

Option?Explicit

Private?WithEvents?NewTextBox?As?TextBox

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

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 動(dòng)態(tài)創(chuàng)建Timer控件

我從來不加到Controls中也能用，大概這個(gè)不是從Control繼承而來的，所有非可視部件（即組件）估計(jì)都不需要add。

網(wǎng)站名稱：vb.net代碼創(chuàng)建控件 vbnet控件開發(fā)
轉(zhuǎn)載注明：http://www.muchs.cn/article24/dogijce.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供ChatGPT、網(wǎng)站建設(shè)、手機(jī)網(wǎng)站建設(shè)、自適應(yīng)網(wǎng)站、外貿(mào)網(wǎng)站建設(shè)、外貿(mào)建站

廣告

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