详细介绍VB.NET动态控件

VB.NET还是比较常用的，于是我研究了一下VB.NET动态控件，在这里拿出来和大家分享一下，希望对大家有用。

创新互联建站专注为客户提供全方位的互联网综合服务，包含不限于成都网站制作、做网站、普洱网络推广、成都微信小程序、普洱网络营销、普洱企业策划、普洱品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等，从售前售中售后，我们都将竭诚为您服务，您的肯定，是我们最大的嘉奖；创新互联建站为所有大学生创业者提供普洱建站搭建服务，24小时服务热线：028-86922220，官方网址：www.cdcxhl.com

本文的讨论也将着眼于这两种情况。首先是当程序员需要动态建立一个控件并将代码附着于控件之上时。例如，你或许想创建一个链接列表，但是不知道需要创建链接的数量或是链接中会出现什么样的数据。第二种是当程序员需要定义代码以反映出特殊需求的时候。例如，你或许要执行能反映用户系统配置的代码。

类似上述的情况当然不会每天都上演。事实上，它们只在非常情况下才出现。然而，作为程序员，仍然要意识到.NET为解决动态情形提供了方案。有了正确的技巧，你就可以写出能灵活处理动态情况的应用程序了。

使用VB.NET动态控件

许多程序员总会遇到需要创建VB.NET动态控件的时候。我们所展示的例子中程序员向FlowLayoutPanel中添加了LinkLabels.或许你可以个这样的设置来记录和保存常用的URL，文件，网络地址或是其他资源所在位置的数值。这一示例没有真正保存链接，但是你可以使用XML序列化功能来实现保存。

每次当用户点击Test按钮时，示例代码就会动态创建一个新的LinkLabel控件。真正的演示代码并不复杂。以下就展示了创建这类控件以及将控件放入FlowLayoutPanel，lstLabel中通常所需要做的一切。

向FlowLayoutPanel中添加新的链接

 
 
 
  
  
  Private Sub btnTest_Click()     
  
  
  Handles btnTest.Click     
  
  
  ' Create a link.     
  
  
  Dim NewLink As LinkLabel = New LinkLabel()     
  
  
  ' Add some properties to it.     
  
  
  NewLink.Text = DateTime.Now     
  
  
  .ToLongTimeString()     
  
  
  ' Set the click event handler.     
  
  
  AddHandler NewLink.Click,     
  
  
  AddressOf NewLink_Click     
  
  
  ' Place the button on the form.     
  
  
  lstLinks.Controls.Add(NewLink)     
  
  
  End Sub

如你所料，该代码开始的时候创建了一个新的LinkLabel并为其赋予了一些值。这一示例使用的是当前时间。你的代码或许能够对某一真实资源进行访问。

请注意该代码也向链接的Click事件中指定了一个处理程序。你必须使用示例中的AddHandler技巧，因为普通的Handles关键词路径不起作用。一方面，设计应用程序的时候你并不清楚控件的名称。即便你为控件指定了一个名称，你也不知道用户要创建的控件数量，所以我们没有办法清楚会有多少处理程序会被创建。处理程序的代码与控件代码类似，因此没有必要创建多个处理程序。用于这个示例的处理代码见例二。例二：处理VB.NET动态控件点击事件

 
 
 
  
  
  Private Sub NewLink_Click( _ ByVal sender As System.Object, ByVal e As System.EventArgs)  
  
  
  ' Verify that you actually have a LinkLabel  
  
  
  If Not sender.GetType() Is GetType(LinkLabel) Then  
  
  
  MessageBox.Show("Wrong control type provided!")  
  
  
  Return  
  
  
  End If  
  
  
  ' Convert the input sender to a Button.  
  
  
  Dim ThisLink As LinkLabel = sender   
  
  
  ' Show that we have the correct button.  
  
  
  MessageBox.Show("You created this link at: " + ThisLink.Text)  
  
  
  End Sub

你可能已经注意到例一中的事件处理器使用的是宽松代表——它没有将ByVal发送器作为System.Object，也没有将ByVal e作为System.EventArgs作为参数因为它不需要这二者。然而，当你创建一个事件处理器来创建VB.NET动态控件时，通常你需要将ByVal发送器作为 System.Object参数，这意味着将这两者都包含其中。

有些程序员在创建事件处理器的时候会出现一个错误，即没有检查传入控件的类型。发送器对象可能包含多选择，而如果未对事件处理器进行事件处理类型的设置，那么你就会面临更多的选择。我们的示例代码一开始就检查了传入控件对象的类型。这样以来发送器就不会像下面所展示的代码一样：

 
 
 
  
  
  Private Sub btnTest2_Click() Handles btnTest2.Click   
  
  
  ' Create a link.  
  
  
  Dim NewButton As Button = New Button()  
  
  
  ' Add some properties to it.  
  
  
  NewButton.Text = DateTime.Now.ToLongTimeString()  
  
  
  ' Set the click event handler.  
  
  
  AddHandler NewButton.Click, AddressOf NewLink_Click  
  
  
  ' Place the button on the form.  
  
  
  lstLinks.Controls.Add(NewButton)  
  
  
  End Sub

此代码在FlowLayoutPanel中创建了一个按钮，大多数情况下这都能正常运行，除非事件处理器不按照按钮所示的进行操作。如果你打算服务多个控件类型，那么每个控件类型都需要一个独特的处理。你可以使用多事件处理器或者为某些类型提供选择标准。

NewLink_Click（）事件处理器照常将传入发送器转换成指定类型，在这个示例中则是LinkLabel.该代码可以访问LinkLabel属性并能用其他方式进行互动。在我们的示例中，只显示了一个能在创建链接的时候告知我们的对话框。

分享标题：详细介绍VB.NET动态控件
标题URL：http://www.shufengxianlan.com/qtweb/news37/301387.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：创新互联

猜你还喜欢下面的内容