代码演示VB.NET事件接收功能

开发 后端
这里用代码实现接收VB.NET事件案例,文章有详细的步骤和代码分析,喜欢研究事件的朋友一定不要错过,看了会有很大的提高。

VB.NET事件还是比较常用的,于是我研究了一下VB.NET事件,在这里拿出来和大家分享一下,希望对大家有用。在单一的VB.NET工程中,我们可以编写代码类接收事件。具体可以增加一个Windows应用工程来解决,你可以右击它并选择Set As Startup Project选项,这样它就可以在按F5的时候被运行了。

#T#为了访问触发VB.NET事件的类,我们必须给EventSource工程增加一个引用,具体操作如下:选择菜单项Project(工程)->Add Reference(增加引用)。之后,我们可以增加一个按钮到窗体上,并且打开窗体的代码窗口,再引入以下的远程名空间:

  1. Imports System.ComponentModel  
  2. Imports System.Drawing  
  3. Imports System.WinForms   
  4. Imports EventSource  

在窗体A中,我们可以使用WithEvents关键字来定义远程类。

  1. Public Class FormA  
  2. Inherits System.WinForms.Form  
  3. Private WithEvents objRemote As RemoteClass  

当objRemote项在左上角的类名字下拉表中被选择的时候,我们可以在代码窗口右上角的方法名字下拉列表中看到事件的列表。当我们选择了这个选项,以下的代码就将被创建:

  1. Public Sub objRemote_RemoteEvent() Handles objRemote.RemoteEvent  
  2. End Sub 

不幸的是,这些代码是错误的,因为它没有提供我们所传递的参数。为了解决这个问题我们只需要增加参数到声明中去即可:

  1. Public Sub objRemote_RemoteEvent(ByVal Data As String) _  
  2. Handles objRemote.RemoteEvent  
  3. Messagebox.Show(Data)   
  4. End Sub  

我们还需要增加代码来在对话框中显示结果。具体做法为:增加一个按钮到窗体中去,并为按钮增加以下的代码:

  1. Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)  
  2. objRemote = New RemoteClass()  
  3. objRemote.DoSomething()  
  4. End Sub 

至此我们就成功完成了从一个工程中触发事件,并且在另外一个工程中接收到这些触发的事件了。

责任编辑:田树 来源: 博客
相关推荐

2009-10-26 09:50:20

VB.NET Star

2009-10-29 13:46:14

VB.NET DES加

2009-11-02 09:45:23

VB.NET文件系统对

2009-10-27 10:58:00

VB.NET文件名排序

2009-10-28 15:18:46

VB.NET网络应用

2009-10-23 17:03:18

VB.NET事件编程

2010-01-12 18:12:58

VB.NET事件

2009-10-26 14:50:18

VB.NET遍历注册表

2009-10-26 10:30:57

VB.NET处理FTP

2009-10-20 14:09:05

VB.NET反射功能

2009-11-04 09:32:12

VB.NET Auto

2009-11-11 13:24:29

VB.NET事件

2009-10-27 14:05:59

VB.NET程序

2009-10-26 11:04:36

VB.NET UDP协

2009-11-02 14:48:45

VB.NET HOOK

2010-01-12 10:48:54

VB.NET LIST

2009-10-23 14:31:05

VB.NET类定义

2009-10-27 11:39:03

VB.NET事件处理程

2010-01-13 09:45:53

VB.NET Arra

2010-01-11 10:08:47

VB.NET事件通道
点赞
收藏

51CTO技术栈公众号