VB.NET中怎么重载Windows控件-成都创新互联网站建设

关于创新互联

多方位宣传企业产品与服务 突出企业形象

公司简介 公司的服务 荣誉资质 新闻动态 联系我们

VB.NET中怎么重载Windows控件

本篇文章为大家展示了VB.NET中怎么重载Windows控件,内容简明扼要并且容易理解,绝对能使你眼前一亮,通过这篇文章的详细介绍希望你能有所收获。

创新互联主营济阳网站建设的网络公司,主营网站建设方案,APP应用开发,济阳h5成都小程序开发搭建,济阳网站营销推广欢迎济阳等地区企业咨询

在VB.NET中,用户可以根据一个已经存在的控件继承出一个新的Windows控件来实现VB.NET重载Windows控件,假设现在需要一种Text控件,当用tab键移到该控件时,整个Text中的内容都被highlight了,在VB 6.0中,这可以通过编写一个新的Dll动态库,但是Textbox控件在工具箱中被屏蔽掉了,并且失去了Textbox的一些有用的事件。而在vb 7.0中则可以通过继承Textbox类而派生出一个新的类。

下面举一个例子,通过Windows设计环境,建立一个窗体,在这个窗体中有两个Textbox,通过在"Project|Add User Control"菜单给工程加入一个名为"HitextBox.vb"的对象,使这个控件继承TextBox的属性,而不是要自定义一个全新的控件,如下:

Public class HtextBox  Inherits Textbox

下面先编译一下整个VB.NET重载Windows控件的工程,新加入的HtextBox控件将会出现在左边的工具栏的底部。用户可以在建立的任何一个Windows窗体中建立一个HtextBox类对象。在类的代码中,插入如下代码以实现highlight的功能:当你用Tab键移到Textbox时,Textbox的全部内容变为hightlight。

  1. Public class HttextBox  

  2. Inherits Textbox  

  3. Public Sub New  

  4. Mybase.New  

  5. 'Add Event event handler  

  6. AddHandler Enter,_  

  7. New System.EventHandler(AddressOf_  

  8. Me.Ht_Enter)  

  9. End Sub  

  10. 'Enter event handler is 
    inside the class  

  11. Protected Sub Ht_Enter(Byval 
    sender as Object,_  

  12. Byval e as System.EventArgs)  

  13. Me.selectionStart=0 

  14. MeMe.selectionLength=Me.text.length  

  15. End Sub  

  16. End Class 

上述内容就是VB.NET中怎么重载Windows控件,你们学到知识或技能了吗?如果还想学到更多技能或者丰富自己的知识储备,欢迎关注创新互联行业资讯频道。


网页标题:VB.NET中怎么重载Windows控件
文章网址:http://kswsj.cn/article/ggshse.html

其他资讯