我想寫出下面的
1*5=5
2*4=8 2*5=10
3*3=9 3*4=12 3*5=15
4*2=8 4*3=12 4*4=16 4*5=20
5*1=5 5*2=10 5*3=15 5*4=20 5*5=25
Private Sub Form_Activate()
For i = 1 To 5
For j = 6 - i To 5
Print Tab(11 * j); i; "X"; j; "="; i * j,
Next j
Print
Next i
End Sub
不知道錯在哪,可以告訴我嗎??
1*5=5
2*4=8 2*5=10
3*3=9 3*4=12 3*5=15
4*2=8 4*3=12 4*4=16 4*5=20
5*1=5 5*2=10 5*3=15 5*4=20 5*5=25
Private Sub Form_Activate()
For i = 1 To 5
For j = 6 - i To 5
Print Tab(11 * j); i; "X"; j; "="; i * j,
Next j
Next i
End Sub
不知道錯在哪,可以告訴我嗎??
文章標籤
全站熱搜

Print Tab(11 * j); i; "X"; j; "="; i * j; '最後面要改成分號