ESPLORAZIONE USO DEI DELEGATE

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

Print
«maggio»
domlunmarmergiovensab
27282930123
45678910
11121314151617
18192021222324
25262728293031
1234567