VB双重循环输出图形阵列，基本符号自选，要求输出大写字母“H”

窗体加入一个文本框，一个按钮，代码如下：

Private Sub Command1_Click()
Dim i As Long, j As Long, s As String
    s = Left(Text1.Text, 1) '输出的字符为文本框第一个字符，不要用中文
    For i = 1 To 11
        For j = 1 To 22
            If i <> 6 And j <> 1 And j <> 22 Then
                Print " ";
            Else
                Print s;
            End If
        Next j
        Print
    Next i
End Sub