Выведите на экран прямоугольник из нулей - VB

Public Class Form1 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim RowCount As Integer
        Dim msg As String
        RowCount = CInt(InputBox("Сколько строк?", "PARAMETR", Int(20 * Rnd())))
        Do While RowCount > 0
            msg = msg & "0 0 0 0 0" & vbNewLine
            RowCount = RowCount - 1
        Loop
        MsgBox(msg)
    End Sub