本篇文章為大家展示了VB.NET中怎么重載Windows控件,內(nèi)容簡明扼要并且容易理解,絕對(duì)能使你眼前一亮,通過這篇文章的詳細(xì)介紹希望你能有所收獲。
創(chuàng)新互聯(lián)主營濟(jì)陽網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,APP應(yīng)用開發(fā),濟(jì)陽h5成都小程序開發(fā)搭建,濟(jì)陽網(wǎng)站營銷推廣歡迎濟(jì)陽等地區(qū)企業(yè)咨詢
在VB.NET中,用戶可以根據(jù)一個(gè)已經(jīng)存在的控件繼承出一個(gè)新的Windows控件來實(shí)現(xiàn)VB.NET重載Windows控件,假設(shè)現(xiàn)在需要一種Text控件,當(dāng)用tab鍵移到該控件時(shí),整個(gè)Text中的內(nèi)容都被highlight了,在VB 6.0中,這可以通過編寫一個(gè)新的Dll動(dòng)態(tài)庫,但是Textbox控件在工具箱中被屏蔽掉了,并且失去了Textbox的一些有用的事件。而在vb 7.0中則可以通過繼承Textbox類而派生出一個(gè)新的類。
下面舉一個(gè)例子,通過Windows設(shè)計(jì)環(huán)境,建立一個(gè)窗體,在這個(gè)窗體中有兩個(gè)Textbox,通過在"Project|Add User Control"菜單給工程加入一個(gè)名為"HitextBox.vb"的對(duì)象,使這個(gè)控件繼承TextBox的屬性,而不是要自定義一個(gè)全新的控件,如下:
Public class HtextBox Inherits Textbox
下面先編譯一下整個(gè)VB.NET重載Windows控件的工程,新加入的HtextBox控件將會(huì)出現(xiàn)在左邊的工具欄的底部。用戶可以在建立的任何一個(gè)Windows窗體中建立一個(gè)HtextBox類對(duì)象。在類的代碼中,插入如下代碼以實(shí)現(xiàn)highlight的功能:當(dāng)你用Tab鍵移到Textbox時(shí),Textbox的全部內(nèi)容變?yōu)閔ightlight。
Public class HttextBox
Inherits Textbox
Public Sub New
Mybase.New
'Add Event event handler
AddHandler Enter,_
New System.EventHandler(AddressOf_
Me.Ht_Enter)
End Sub
'Enter event handler is
inside the classProtected Sub Ht_Enter(Byval
sender as Object,_Byval e as System.EventArgs)
Me.selectionStart=0
MeMe.selectionLength=Me.text.length
End Sub
End Class
上述內(nèi)容就是VB.NET中怎么重載Windows控件,你們學(xué)到知識(shí)或技能了嗎?如果還想學(xué)到更多技能或者豐富自己的知識(shí)儲(chǔ)備,歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道。