Question

How to use the Func delegate in VB.NET

Answer 1

Imports System

Public Class Program
	Public Shared Function AMessage() As String
        Return "May the Force be with you"
    End Function

    Public Shared Sub Main()
        Dim say As Func(Of String) = AddressOf AMessage
		
        Console.WriteLine(say())
    End Sub
End Class





' run:
'
' May the Force be with you
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System

Public Class Program
	Public Shared Function Sum(ByVal x As Integer, ByVal y As Integer) As Integer
        Return x + y
    End Function

    Public Shared Sub Main()
        Dim add As Func(Of Integer, Integer, Integer) = AddressOf Sum
        
		Dim result As Integer = add(5, 5)
		
        Console.WriteLine(result)
    End Sub
End Class






' run:
'
' 10
'

 

70+ SQL courses for beginners and professionals

Answer 3

Imports System

Public Class Program
	Public Shared Function Sum(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) As Integer
        Return x + y + z
    End Function

    Public Shared Sub Main()
        Dim add As Func(Of Integer, Integer, Integer, Integer) = AddressOf Sum
		
        Dim result As Integer = add(5, 5, 5)
		
        Console.WriteLine(result)
    End Sub
End Class






' run:
'
' 15
'

 

70+ SQL courses for beginners and professionals