Question

在VB中,怎么用循环语句for打印出一个倒正三边形，如：*********** ********* ******* ***** *** *

Answer 1

应该是想要一个倒立的等腰三角形吧：

Sub Command1_Click()
    Dim i As Integer
    For i = 1 To 11 Step 2
        For m = 11 To i Step -1
            Debug.Print "*";
        Next
        Print Chr(10) & Space(1 + i \ 2);
    Next
End Sub