visual basic,비주얼베이직,vb .net강좌-델리게이트,대리자,Delegate,AddressOf

빈 폼만 생성합니다.

Public Class Form1

    Delegate Sub mydel(ByVal a As String) '2. 델리게이트 정의/ 인자와 반환형은 참조메소드와 동일해야함

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim tx As New Test     ' Shared 멤버 는 객체생성없이 

        Dim md As New mydel(AddressOf tx.mes) '3 . 델리게이트 객체생성/ tx.mes는 소속클래스와 메소드 

        md("hi!!!")  '4.델리게이트 사용                       ' Shared 멤버 는 객체생성없이  test.mes

    End Sub

End Class

Public Class Test

    Public Sub mes(ByVal c As String) '1.델리게이트가 참조할 메소드 정의

        MessageBox.Show(c)

    End Sub

End Class

결과는