9 Public Sub F() Implements I.F
\r
13 Module InterfaceTest
\r
17 Dim x As C = New C()
\r
19 Catch e As Exception
\r
20 Console.WriteLine("#A1:Interface:Failed-error creating instance of class implementing interface"+e.Message)
\r
24 Dim y As I = New C()
\r
26 Catch e As Exception
\r
27 Console.WriteLine("#A2:Interface:Failed - error declaring varaibles of the interface")
\r
28 Console.WriteLine(e.Message)
\r