mcs/btests/LocalVariablesC2.vb

   1 REM LineNo: 10\r
   2 REM ExpectedError: BC30290\r
   3 REM ErrorMessage: Local variable cannot have the same name as the function containing it.\r
   4 \r
   5 Imports System\r
   6 \r
   7 Module LocalVariablesC2\r
   8 \r
   9     Function f1(ByVal a As Integer) As Integer\r
  10         Dim f1 As Integer = 10\r
  11         f1 = f1 + a\r
  12     End Function\r
  13 \r
  14     Sub Main()\r
  15         Console.WriteLine(f1(0))\r
  16     End Sub\r
  17 \r
  18 End Module