projects
/
mono.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Cairo GTK# Mono sample
[mono.git]
/
mcs
/
btests
/
EventE.vb
1
Imports System
\r
2
3
Public Class C
4
Public Event E()
5
\r
6
Sub S()
\r
7
RaiseEvent E()
\r
8
End Sub
\r
9
End Class
\r
10
11
\r
12
Module M
\r
13
Sub S1()
\r
14
Dim x As New C()
\r
15
AddHandler x.E, AddressOf EH
\r
16
x.S()
\r
17
End Sub
\r
18
\r
19
Sub EH()
\r
20
Console.WriteLine("Event fired")
\r
21
End Sub
\r
22
\r
23
Sub Main()
\r
24
S1()
\r
25
End Sub
\r
26
\r
27
End Module
\r
28
\r