讲述关于VB.NET事件处理程序

VB.NET经过长时间的发展，很多用户都很了解它了，这里我就VB.NET事件处理程序发表一下个人理解，和大家讨论讨论。

文件系统监控

我曾经遇到过一些应用程序，需要等待和处理某个特定目录中的文件-例如，将数据从文件导入到数据库中去的应用程序。数据文件可以从某个大型机上下载，或者被转移到某个输入目录中，该应用程序将它们导入到数据库中。你不用经常地轮询该目录检查是否有新文件，可以等待生成新文件的通知。你可以在Visual Basic 6.0中使用Win32 API来做到这一点，而在Visual Basic .NET中你可以使用.NET Framework类来做这项工作。但是在.NET中实施文件监控与在.NET中完成其他工作的方法更加一致，因此学习曲线是最小的。

你可以使用System.IO.FileSystemWatcher .NET类对文件系统进行监视。它提供了一些属性，允许你设置监控的路径，指定是对文件还是子目录层次的变化感兴趣。System.IO.FileSystemWatcher还允许你指定需要监控的文件名和文件类型(例如，*.xml是指监控所有XML文件的变化)。最后，你可以指定感兴趣的变化类型-例如，只对新建文件，文件属性的变化或文件大小的变化感兴趣。
在你设置了监控内容后，你需要钩住用于感兴趣的各种事件的VB.NET事件处理程序。FileSystemWatcher事件有Changed、Created、Deleted、Error和Renamed。要处理某个事件，首先你需要编写一个与FileSystemEventHandler代理相同声明的VB.NET事件处理程序，然后将这个处理程序添加到FileSystemWatcher类中。这个基于代理的体系结构允许你为同一个事件添加多个处理程序，或者对于多个事件使用同一个处理程序-而你不能使用Visual Basic 6.0做到这一点。

 
 
 

  
  
  
注释：System.IO contains the  
  
  
  
注释：file monitoring classes and types 
  
  
  
Imports System.IO 
  
  
  
Module  
  
  
  
Module1 
  
  
  
Sub Main()　 
  
  
  
注释：FileSystemWatcher does the real work 
  
  
  
Dim fw As New FileSystemWatcher()　 
  
  
  
注释：WaitForChangedResult is what you 　 
  
  
  
注释：get back when a change occurs　 
  
  
  
Dim result As WaitForChangedResult　 
  
  
  
注释：set the path to monitor　 
  
  
  
fw.Path = "C:WINNT"　 
  
  
  
注释：tell it whether to watch files or directories 
  
  
  
fw.Target = WatcherTarget.File　 
  
  
  
注释：tell it whether to include subdirs　 
  
  
  
fw.IncludeSubdirectories = False　 
  
  
  
注释：hook up handlers　AddHandler fw.Created,New FileSystemEventHandler(AddressOf OnFileNotify)注释：enable the watcher　 
  
  
  
fw.Enabled = True　DoConsole.WriteLine("Beginning to monitor")　 
  
  
  
注释：this is where we actually wait 
  
  
  
注释：waiting blocks execution for the specified timeoutresult = fw.WaitForChanged(WatcherChangeTypes.All, 60000)Console.WriteLine("Hit Enter to continue q to quit")　 
  
  
  
Loop While (Console.ReadLine <> "q")End Sub 
  
  
  
注释：This is the delegate that gets  
  
  
  
注释：called when a file is created　 
  
  
  
Public Sub OnFileNotify(ByVal source As Object, ByVal e As FileSystemEventArgs)Console.WriteLine( "Notification received for file , change type is ", _e.FullPath, e.ChangeType)　End SubEnd Module 
 
 
 

你可以创建一个FileSystemWatcher，然后设置它的属性。你可以使用AddHandler将FileSystemEventHandler代理与各种FileSystemWatcher事件关联起来，如Created。然后你就可以启用FileSystemWatcher，然后调用WaitForChanged。该调用将在变化发生或达到指定的超时时返回。

创建Windows服务

当你要创建一个Windows服务时，你必须使用Visual C++或在Visual Basic中使用srvany.exe或第三方工具来创建该服务。任何一种方法，你都没有在Visual Basic中编写自己的服务，你只是正在Visual Basic运行时的外部添加更多从属组件。 如果你使用C++或C语言，在不使用活动模版库(Active Template Library)的情况下从头编写一个Windows服务，你将不得不编写一小段代码来协调你的服务与服务控制器(Service Control Manager，SCM)之间的往来通信，SCM用来处理服务的启动、暂停、继续和停止。.NET Framework通过提供System.ServiceProcess.ServiceBase类，使得实现一个服务变得很容易。要编写一个服务，你可以从这个类继承，重载它的某些方法，设置它的属性，然后就大功告成了！

你可能要重载的一些方法包括：OnStart、OnStop、OnPause和OnContinue。通常你需要载启动工作线程(worker thread)的位置重载OnStart，在需要取消这个工作线程的位置重载OnStop。在你创建了自己的服务后，你就可以使用SCM安装和注册这个服务。这是另一个领域，.NET Framework中的基类提供了大部分所需的工作。你可以创建一个继承自System.Configuration.Install.Installer的类，从System.ServiceProcess.ServiceInstaller中例示对象，然后设置它的属性，如服务启动模式和服务名称。这使得.NET安装实用工具installUtil.exe能够安装(和删除)你的服务，而你无需编写额外的代码。

当你开始使用Visual Studio .NET时，你将会发现Visual Studio .NET使得使用.NET Framework变得更容易。Visual Studio .NET允许你创建Windows服务(拥有安装程序(installer))，监控文件系统的变化，写入事件记录 - 所有都是使用设计器和组件而不是编写代码来完成。例如，要将一个安装程序添加到自己的服务项目中，你只需选中服务设计器避免，然后单击属性(Properties)窗口底部的添加安装程序(Add Installer)。这将添加一个新模块ProjectInstaller.vb，该模块包括安装该服务所需的全部代码。你可以使用设计器，对安装选项，如启动模式进行自定义。

结论

.NET Framework使得你能够利用Visual Basic .NET，很容易地开发健壮地VB.NET事件处理程序。它使得你可以将重点放在学习一种相容的程序设计模型上，并且使得你可以直接访问底层的.NET平台。利用Visual Basic .NET和.NET Framework，你可以使自己的应用程序达到前所未有的水平。

标题名称：讲述关于VB.NET事件处理程序
网址分享：http://www.csdahua.cn/qtweb/news28/435728.html

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

广告

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