mcs/btests/EnumC2.vb

   1 Imports System\r
   2 \r
   3 Module M\r
   4         Public Enum E1 As Long\r
   5                 A = 2\r
   6                 B\r
   7         End Enum\r
   8 \r
   9    Sub Main()\r
  10         E1.A = 5\r
  11         \r
  12     End Sub\r
  13 \r
  14         \r
  15 \r
  16 End Module\r