Imports System
Public Class Test
Public Shared Sub Main()
Dim n As Integer
n=1
Do While n<=10
System.Console.WriteLine(n)
n=n+1
Loop
End Sub
End Class
Standard output is empty
Unhandled Exception: System.InvalidCastException: Conversion from string "Imports System" to type 'Integer' is not valid. ---> System.FormatException: Input string was not in the correct format
at System.Int32.Parse (System.String s) [0x00000]
at Microsoft.VisualBasic.CompilerServices.IntegerType.FromString (System.String Value) [0x00000]
--- End of inner exception stack trace ---
at Microsoft.VisualBasic.CompilerServices.IntegerType.FromString (System.String Value) [0x00000]
at Microsoft.VisualBasic.CompilerServices.Conversions.ToInteger (System.String Value) [0x00000]
at Test.Main () [0x00000]