Question

这个VB编程题怎么写，求大神指点迷津

这个VB编程题怎么写，求大神指点迷津第一个编程题写

Answer 1

Const N = 5
Private Sub Command1_Click()
    For i = 1 To N
        For j = 1 To i
            Print "*";
        Next j
        Print
    Next i
    Print
End Sub

Private Sub Command2_Click()
    For i = 1 To N
        Print Tab(N + 1 - i);
        For j = 1 To i
            Print "*";
        Next j
        Print
    Next i
    Print
End Sub

Private Sub Command3_Click()
    For i = 1 To N
        For j = 1 To N + 1 - i
            Print "*";
        Next j
        Print
    Next i
    Print
End Sub

Private Sub Command4_Click()
    For i = 1 To N
        Print Tab(i);
        For j = 1 To N + 1 - i
            Print "*";
        Next j
        Print
    Next i
    Print
End Sub