Delegate Function Add(ByVal a As Integer, ByVal b As Integer) As Integer

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
 
        dodel(AddressOf myadd)
 
    End Sub

    Private Sub dodel(ByVal del As Add)
        Debug.WriteLine(del(3, 4).ToString())
    End Sub

    Pivate Function myadd(ByVal a As Integer, ByVal b As Integer) As Integer
        Return a + b
    End Function