酷祥資訊部落格

關於部落格
遊戲、資訊
  • 88289

    累積人氣

  • 2

    今日人氣

    0

    訂閱人氣

vb程式用*輸出三角形


*
**
***
****
*****
  For i = 1 To 5
     Print String(i, "*")
  Next i

*****
****
***
**
*
  For i = 5 To 1 Step -1
     Print String(i, "*")
  Next i

    *
    **
   ***
  ****
 *****
  N = 10
  For i = 1 To 5
     Print String(N, " "); String(i, "*")
     N = N - 1
  Next i

相簿設定
標籤設定
相簿狀態