PROVA USO DELEGATE
'Prova uso delegate
delegate sub Pippo(byval pluto as string)
dim deleg as Pippo = new pippo(addressof Messaggio)
sub Messaggio (byval msg as string)
Messagebox.Show (msg)
end sub
'richiamo
deleg("Bravo")
posted @ lunedì 27 dicembre 2004 12:48