projects
/
mono.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
2004-09-06 Marek Safar <marek.safar@seznam.cz>
[mono.git]
/
mcs
/
btests
/
EventH.vb
1
Imports System
2
3
Class C
4
Public Event E
5
6
Public Sub S()
7
RaiseEvent E
8
End Sub
9
End Class
10
11
Class C1
12
Inherits C
13
14
Sub call_S()
15
S()
16
End Sub
17
18
Sub EH() Handles MyBase.E
19
Console.WriteLine("event-H called")
20
End Sub
21
End Class
22
23
Module M
24
Sub Main()
25
dim y as new C1 ()
26
y.call_S()
27
End Sub
28
End Module