如何利用For循环打印九九乘法表

1、新建Form窗体，加入picturebox和command 控件

2、双击command按钮 进入代码块

3、书写代码

4、源代码

Private Sub Command1_Click()

  Dim se As String

  Picture1.Print Tab(35); "9*9乘法表" '表头

  For i = 1 To 9 '外层大循环 1到9

    For j = 1 To i '内层小循环

      se = j & "*" & i & "=" & j * i '计算每行的内容

      Picture1.Print Tab((j - 1) * 9); se; '打印出每行的内容

    Next j

  Picture1.Print

  Next i

End Sub

5、按F5运行结果