projects
/
mono.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
2004-06-09 Atsushi Enomoto <atsushi@ximian.com>
[mono.git]
/
mcs
/
btests
/
InterfaceC.vb
1
\r
2
Interface I
\r
3
Function F()
\r
4
End Interface
\r
5
\r
6
MustInherit Class C1
\r
7
Implements I
\r
8
\r
9
Function F() Implements I.F
\r
10
End Function
\r
11
End Class
\r
12
\r
13
MustInherit Class C2
\r
14
Implements I
\r
15
\r
16
MustOverride Function F() Implements I.F
\r
17
End Class
\r
18
\r
19
\r
20
Class DC1
\r
21
Inherits C1
\r
22
End Class
\r
23
\r
24
Class DC2
\r
25
Inherits C2
\r
26
\r
27
Overrides Function F()
\r
28
End Function
\r
29
End Class
\r
30
\r
31
Module InterfaceC
\r
32
Sub Main()
\r
33
Dim x As DC1 = New DC1()
\r
34
x.F()
\r
35
\r
36
Dim y As DC2 = New DC2()
\r
37
y.F()
\r
38
End Sub
\r
39
End Module
\r
40
\r