Private Sub Command1_Click()
Dim i%, j%, Rsult$
For i = 1 To 9
For j = 1 To i
If j = 1 Then Print i & ": ";
Print i & "×" & j & "=" & i * j,
Next j
Print
Next i
End Sub
dim i,j as integer
for i=1 to 9
for j=1 to 9
print str(i)+"*"+str(j)+"="+str(i*j)
next j,i
内容全部来源于网络收集，如有侵权，请联系网站删除!
QQ：24596024