vb.net用戶控件屬性 vb常用控件屬性

VB.NET 通過代碼訪問用戶控件的屬性

Controls有個查找方法,返回指定類型的對象集合。

創(chuàng)新互聯(lián)公司堅持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:網(wǎng)站建設(shè)、做網(wǎng)站、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時代的湘潭縣網(wǎng)站設(shè)計、移動媒體設(shè)計的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!

Find,或者OfType

關(guān)于vb.net中屬性的定義

Property用于標(biāo)識一個類成員為屬性而不是方法.屬性可以被獲取,屬性在被獲以的時候利用get句柄返回其值.屬性可以被賦值,這個過程是由set句柄完成的.這兩個句柄可以不同時存在.如果只有g(shù)et而沒有set,那屬性就是只讀的.如果只有set而沒有g(shù)et,那屬性就是只寫的.

就是定義了兩個屬性:s_name和s_sex

Overridable 表示這個屬性可以被重載。

vb.net自定義控件問題

首先,你已經(jīng)完成的步驟是:

1.新建一個用戶控件[注意,用戶控件(UserControl)不是自定義控件(CustomControl)]

2.給用戶控件起個名字(我在此處起名叫 RadioList)

3.在用戶控件上畫一個 GroupBox,命名為 RadioGroup,

并將其 Dock 屬性設(shè)置為 Fill

然后,你需要做的是動態(tài)增減控件。

如果你以前用過 VB 6,你可能會想到控件數(shù)組,

但在此處,你可以直接增刪控件。

具體實(shí)現(xiàn)如下:

4.在 GroupBox 里畫一個 FlowLayoutPanel,命名為 RadioPanel,

將其 AutoScroll 屬性設(shè)置為 True,即自動顯示滾動條,

并設(shè)置其 FlowDirection 屬性(例如設(shè)置為 TopDown)

這樣就省去了手動調(diào)整 RadioButton 位置的麻煩

5.實(shí)現(xiàn)選項(xiàng)的動態(tài)增減(以下只是我的思路,你可以發(fā)揮一下)

(十分簡潔,注釋除外):

''' summary

''' 創(chuàng)建一個新的 RadioButton。

''' /summary

Private Function CreateRadio() As RadioButton

Dim NewRadio As New RadioButton

components.Add(NewRadio)

'components 字段由控件設(shè)計器自動創(chuàng)建,

'此代碼目的是使控件在銷毀(Dispose)時能自動銷毀 RadioButton

'詳情參見 RadioList.Designer.vb

NewRadio.Parent = RadioPanel

'設(shè)置容器

AddHandler NewRadio.CheckedChanged, AddressOf RadioButtons_CheckedChanged

'設(shè)置事件處理程序

Return NewRadio

End Function

''' summary

''' 移除已存在的 RadioButton。

''' /summary

Private Sub RemoveRadio(ByVal dest As RadioButton)

components.Remove(dest)

dest.Dispose()

End Sub

'無中生有的 RadioButton 的事件處理程序

Private Sub RadioButtons_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

'在此處設(shè)置選中項(xiàng)的屬性,通過 sender 來確定不同的 OptionButton

'你可以通過將 OptionButton 放在一個列表,

'如 List(Of OptionButton) 中來像數(shù)組一樣維護(hù)選項(xiàng)的次序

'注意,此處需要判斷 sender 的 Checked 屬性是否為 True

'因?yàn)?Changed 是“改變”,而不是“選中”

'例如:

If DirectCast(sender, RadioButton).Checked Then

SelectedIndex = ...

End If

End Sub

vb.net用戶控件問題 2

屬性修改后沒有任何設(shè)置,當(dāng)然不會改變,改改

Set(ByVal?value?As?String)

Text_1?=?value

Me.Label1.Text?=?Text_1

End?Set

Set(ByVal?value?As?String)

Text_2?=?value

Me.Label2.Text?=?Text_2

End?Set

標(biāo)題名稱:vb.net用戶控件屬性 vb常用控件屬性
分享網(wǎng)址:http://muchs.cn/article0/doeeoio.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站內(nèi)鏈、全網(wǎng)營銷推廣、面包屑導(dǎo)航、網(wǎng)站維護(hù)響應(yīng)式網(wǎng)站

廣告

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

小程序開發(fā)