projects
/
mono.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
new error test
[mono.git]
/
mcs
/
btests
/
DelegateC2.vb
1
Imports System
2
3
Module M
4
Delegate Sub SD()
5
sub f()
6
End sub
7
8
Public Delegate Function SF(a as integer) as Integer
9
Public Function f1(a as integer) as Integer
10
return a
11
End Function
12
13
Sub Main()
14
dim d1 as SD
15
d1= new SD(AddressOf f1)
16
d1.Invoke()
17
End Sub
18
End Module