VB编写程序将九九乘法表打印窗体上，格式要想图中一样

2025-05-22 23:15:18

推荐回答（4个）

回答（1）：

嵌套循环 Print 变量拼接字符串

回答（2）：

Private Sub Form_Click()
Dim i, j As Integer
Dim s As String
Print Tab(35); "九九乘法表"
For i = 1 To 9
For j = 1 To i
s = i & "×" & j & "=" & i * j
Print Tab((j - 1) * 9 + 2); s;
Next j
Print
Next i
End Sub

回答（3）：

很简单的

Private Sub Form_Load()
Me.Show
Dim I As Integer, J As Integer
For I = 1 To 9
    For J = 1 To 9
        Print I & " × " & J & " = " & I * J,
    Next J
    Print
Next I
End Sub

回答（4）：

Private Sub Form_Load()

Dim i As Integer, j As Integer

Me.AutoRedraw = True

For i = 1 To 9

For j = 1 To 9

Print i & "*" & j & "=" & i * j,

Next j

Next i

End Sub