Rectangle Learn programming Visual Basic (VB.net)

Imports System
Public Class exercise13
    Public Shared Sub Main()
        Dim x As Integer
        Console.Write("Enter a number: ")
        x = Convert.ToInt32(Console.ReadLine())
        Console.WriteLine("{0}{0}{0}", x)
        Console.WriteLine("{0} {0}", x)
        Console.WriteLine("{0} {0}", x)
        Console.WriteLine("{0} {0}", x)
        Console.WriteLine("{0}{0}{0}", x)
    End Sub
End Class