Procedure Delegates in VB.net
By: Steven Holzner
Sometimes, it's useful to be able to pass the location of a procedure to other procedures. That location is the address of the procedure in memory, and it's used in VB .NET to create the callback procedures. To work with the address of procedures, you use delegates in VB .NET.
Here's an example; in this case, I'll create a delegate for a Sub procedure named DisplayMessage:
Module Module1 Sub Main() ⋮ End Sub Sub DisplayMessage(ByVal strText As String) System.Console.WriteLine(strText) End Sub End Module
I start by declaring the delegate type, which I'll call SubDelegate1, and creating a delegate called Messager:
Module Module1 Delegate Sub SubDelegate1(ByVal strText As String) Sub Main() Dim Messager As SubDelegate1 ⋮ End Sub Sub DisplayMessage(ByVal strText As String) System.Console.WriteLine(strText) End Sub End Module
Now I use the AddressOf operator to assign the address of DisplayMessage to Messager, and then use Messager's Invoke method to call DisplayMessage and display a message:
Module Module1 Delegate Sub SubDelegate1(ByVal strText As String) Sub Main() Dim Messager As SubDelegate1 Messager = AddressOf DisplayMessage Messager.Invoke("Hello from Visual Basic") End Sub Sub DisplayMessage(ByVal strText As String) System.Console.WriteLine(strText) End Sub End Module
And that's all it takes-this code will display the message "Hello from Visual Basic", as it should.
Archived Comments
1. Billyweimb
View Tutorial By: Billyweimb at 2017-05-18 11:56:32
2. thanking u ...
View Tutorial By: TigerN at 2011-09-30 08:47:59
Comment on this tutorial
- Data Science
- Android
- AJAX
- ASP.net
- C
- C++
- C#
- Cocoa
- Cloud Computing
- HTML5
- Java
- Javascript
- JSF
- JSP
- J2ME
- Java Beans
- EJB
- JDBC
- Linux
- Mac OS X
- iPhone
- MySQL
- Office 365
- Perl
- PHP
- Python
- Ruby
- VB.net
- Hibernate
- Struts
- SAP
- Trends
- Tech Reviews
- WebServices
- XML
- Certification
- Interview
categories
Related Tutorials
Using Resume Next and Resume Line in VB.net
Using On Error GoTo 0 in VB.net
Getting an Exception's Number and Description in VB.net
Raising an Exception Intentionally in VB.net
Exception Filtering in the Catch Block in VB.net
Using Multiple Catch Statements in VB.net
Throwing an Exception in VB.net
Throwing a Custom Exception in VB.net
Changes in Controls from VB6 to VB.net
Unstructured Exception Handling in VB.net