2004-08-27 Martin Baulig <martin@ximian.com>
[mono.git] / mcs / btests / InterfaceC2.vb
1 Interface I\r
2     Function F1(ByVal i As Integer)\r
3     Function F2(ByVal i As Integer)\r
4 End Interface\r
5 \r
6 Class B\r
7     Implements I\r
8 \r
9     Overridable Function CF1(ByVal i As Integer) Implements I.F1\r
10     End Function\r
11 \r
12     Overridable Function CF2(ByVal i As Integer) Implements I.F1\r
13     End Function\r
14 End Class\r
15 \r
16 Module InterfaceC3\r
17     Sub Main()\r
18     End Sub\r
19 End Module\r