vb 星星问题代码一问？

Question

vb 输出星星 
hollow square输入5 显示
我的代码
Public Class Form1
    Dim i, t As Integer
    Dim p As String    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        i = InputBox("please enter square length")
        For t As Integer = 1 To i
            For g As Integer = 1 To i
                If t = 1 Or t = i Then                    p &= "*"
                Else
                    If g = 1 Or g = i Then
                        p &= "*"
                    Else
                        p &= Space(1)                    End If
                End If
            Next            p &= vbNewLine        Next        MessageBox.Show(p)  End Sub
End Class
中间的空格显示不多 要怎么改vb一个字母的空格的代码是什么？

Answer 1

字体的问题，换在label上显示吧，

Answer 2

不要用MsgBox来显示。你用一个多行文本框显示，字体设为等宽字体（比如 Consolas）就正确了。