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

(1)ASP.NET C# 專案／程式維護、開發、設計、架設網站等等
(2)程式家教.家教採一對一教學方式，主要以ASP.NET、C#、SQL SERVER..等為主，家教包含異業轉行、非本科系轉行、無基礎但欲踏入程式設計領域者。
若有以上需求請至留言板留言

部落格全站分類：圖文創作

Dec 20 Sun 2009 00:51
[VB6]列印*號(二)

列印結果
*
***
*****
*******

Private Sub Form_Activate()
    Dim i As Integer
    Dim j As Integer
    Dim row As Integer
    row = 4
    For i = 1 To row
        Print Spc(row - i);
        For j = 1 To i + i - 1
            Print "*";
        Next
        Print
    Next
End Sub