用VB编写九九乘法表讲课稿

精品文档

乘法表：

Private Sub Form_Click()

For i = 1 To 9

For j = 1 To i

Print j; "*"; i; "="; i * j;

If j = 2 And (i = 3 Or i = 4) Then

Print " ";

End If

Next j

Print

Next i

End Sub

运行图示：

精品文档