Re: [請益] 沒有想像中簡單的小問題

[sumihara (sumihara)]

使用VB6....

Private Sub cmdRUN_Click()
  Dim i, j As Integer
  For i = -2 To 2
    Print Spc(2 * Abs(i));
    For j = 1 To 5 - 2 * Abs(i)
      Print j + 2;
    Next j
    Print
  Next i
End Sub


--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 203.71.33.35