7 Dim a As Integer = 10
\r
8 Dim b As String = "abc"
\r
9 Dim c As cls = New cls()
\r
12 Dim e() As Integer = {1, 2, 3, 4, 5}
\r
15 Console.WriteLine(b)
\r
18 Throw New Exception("#A1, value mismatch")
\r
21 Throw New Exception("#A2, value mismatch")
\r