利用VB语言编程:输出九九乘法表

2025-03-04 15:33:24
推荐回答(1个)
回答1:

上面的哪是九九乘法表啊
我这有两种

Private Sub Form_Load()
Me.AutoRedraw = True
Cls
For j = 1 To 9
For k = 1 To 9
If k > j Then Exit For
Print k & "*" & j & "=" & j * k; " ";
Next k
Print
Next j
End Sub

''''''''''''''''
Private Sub Form_Click()
Dim i, j As Integer
For i = 1 To 9
For j = i To 9
Line (i * 200, j * 250)-(i * 200, j * 250)
ForeColor = i * j * 253
Print Space((i - 1) * 6); i & "×" & j & "=" & i * j
Next j
Next i
End Sub

我修过VB、、电脑正好有答案、、、
其实课本上也是有答案啊

满意请好评、。、谢谢。。