Added new tests for Loop Statements
[mono.git] / mcs / btests / LocalVariablesC3.vb
1 ' BC30451: Name 'b' is not declared\r
2 \r
3 Imports System\r
4 \r
5 Module LocalVariablesC3\r
6 \r
7     Sub main()\r
8         Dim a As Integer = 0\r
9         If a <> 0 Then\r
10             Dim b As Integer = 1\r
11             Console.WriteLine(b)\r
12         Else\r
13             Dim b As Integer = 2\r
14             Console.WriteLine(b)\r
15         End If\r
16         Console.WriteLine(b)\r
17     End Sub\r
18 \r
19 End Module