10 Public Delegate Function SF(a as integer) as Integer
11 Public Function f1(a as integer) as Integer
17 d1 = new SD(AddressOf f)
21 'd2 = AddressOf f ''//this invocation is not functional yet
24 dim d3 as new SD(AddressOf f)
28 d4 = new SF(AddressOf f1)
29 Dim i as Integer = d4.Invoke(10)
31 Throw new System.Exception ("#A1, Unexpected result")