怎样用VBA 做九九乘法表

分也太少了吧 晕 你得加分
两个
Private Sub Form_Load()
show
fontsize=12
print tab（25）；"九九"
print
print"*"；
for i =1to9
print tab（i*6）；i；
next i
for k=1toi
m=i*k
print tab（k*6）；m；
next i
end sub

Private Sub Form_Load()
MsgBox "拜托加点分"
Dim i As Integer
Dim j As Integer
Show
For i = 1 To 9
For j = 1 To i
Print Tab((j - 1) * 7 + 2); i & "*" & j & "=" & i * j;
Next j
Print
Next i
End Sub

分也太少了吧 晕 你得加分
两个
Private Sub Form_Load()
show
fontsize=12
print tab（25）；"九九"
print
print"*"；
for i =1to9
print tab（i*6）；i；
next i
for k=1toi
m=i*k
print tab（k*6）；m；
next i
end sub

Private Sub Form_Load()
MsgBox "拜托加点分"
Dim i As Integer
Dim j As Integer
Show