mcs/btests/EnumC1.vb

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