mcs/btests/ConstituentTypesC1.vb

   1 Imports System\r
   2 Public Class C1\r
   3         Private Class C2\r
   4         End Class\r
   5         Public Function F() As C2 'Function F exposes private class C2\r
   6         End Function\r
   7 \r
   8         Private Function F1() As C2\r
   9         End Function\r
  10 End Class\r
  11 Module ConstituentTypes\r
  12         Sub Main()\r
  13                 Dim myC As New C1()\r
  14                 \r
  15         End Sub\r
  16 End Module\r