Source code in the visual programming language

Dim i As Integer
Console.WriteLine("Enter an Integer")
i = Console.ReadLine()

Dim i As Integer
Dim iString As String
Console.WriteLine("Enter an Integer")
iString = Console.ReadLine()
Try
    i = Convert.ToInt32(iString)
Catch ex As Exception
    Console.WriteLine("This is not an Integer")
End Try

Dim i As String
Console.WriteLine("Enter a String")
i = Console.ReadLine()