mcs/mbas/Test/errors/ForC2.vb

   1 REM LineNo: 21
   2 REM ExpectedError: BC30039
   3 REM ErrorMessage: Loop control variable cannot be a property or a late-bound indexed array.
   4
   5 Imports System
   6
   7 Module ForC2
   8
   9     Private index As Integer = 0
  10     Public Property myindex() As Integer
  11         Get
  12             Return index
  13         End Get
  14         Set(ByVal Value As Integer)
  15             index = Value
  16         End Set
  17     End Property
  18
  19     Sub main()
  20
  21         For myindex = 0 To 10
  22             Console.WriteLine("Hello World")
  23         Next
  24
  25     End Sub
  26
  27 End Module