mcs/btests/EnumC6.vb

   1 Imports System\r
   2 \r
   3 Module M\r
   4         Public Enum E1\r
   5                 A =  System.Int32.MaxValue\r
   6                 B \r
   7         End Enum\r
   8 \r
   9    Sub Main()\r
  10         Dim i as integer = E1.A\r
  11     End Sub\r
  12 End Module\r
  13 \r