close

列出結果
　　　　＊
　　　＊＊
　　＊＊＊
　＊＊＊＊
＊＊＊＊＊

Private Sub Form_Activate()
    For i = 1 To 5
        Print Spc(5 - i);
        For j = 1 To i
            Print "*";
        Next
        Print
    Next
End Sub


arrow
arrow
    全站熱搜
    創作者介紹
    創作者 Roger 的頭像
    Roger

    歡迎~ 程式設計 學生 作業 專題製作 程式外包 家教...

    Roger 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄