输出一个５行的左上三角形

Dim temp, strTemp As String
        Dim x, i As Integer
        For x = 5 To 1 Step -1
            temp = ""
            For i = 1 To x
                temp = temp & i
            Next
            strTemp = strTemp & temp & vbCrLf
        Next
        Me.Label1.Text = strTemp

label1的textalivgn 設置為：MiddleLeft