mcs/btests/InterfaceC3.vb

   1 Imports System
   2 Interface I
   3         Sub S()
   4            Dim a As Integer
   5         End Sub
   6 End Interface
   7 Module InterfaceC3
   8         Sub Main()
   9
  10         End Sub
  11 End Module