酷祥資訊部落格

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

    累積人氣

  • 2

    今日人氣

    0

    訂閱人氣

99乘法表


1x1=1 2x1=1 ......
1x2=2 2x2=2.......
1x3=3 2x3=6.......
.........
Private Sub Command1_Click()
i = 1
j = 1
Do Until i > 9
Do Until j > 9
Print j; "x"; i; "="; i * j;
j = j + 1
Loop
Print
i = i + 1
j = 1
Loop
End Sub

9x9=81 8x9=72 ......
9x8=72 8x8=64......
9x7=63 8x7=56.......
...........

Private Sub Command2_Click()
i = 9
j = 9
Do Until i < 1
Do Until j < 1
Print j; "x"; i; "="; i * j;
j = j - 1
Loop
Print
i = i - 1
j = 9
Loop
End Sub
相簿設定
標籤設定
相簿狀態