有谁能用VB将乘法表倒着输出

来源:百度知道 编辑:UC知道 时间:2024/06/20 07:39:56

Dim i As Integer, j As Integer
For i = 1 To 9
For j = 9 To i Step -1
Print i & "×" & j & "=" & i * j & " ";
Next j
Print
Next i

Private Sub Command1_Click()
Dim i As Integer, j As Integer
For i = 9 To 1 Step -1
For j = 9 To 1 Step -1
Print j & "×" & i & "=" & i * j & " ";
Next j
Print
Next i
End Sub

Private Sub Command1_Click()
Dim i As Integer, j As Integer
For i = 9 To 1 Step -1
For j = 9 To i Step -1
Print j & "×" & i & "=" & i * j & " ";
Next j
Print
Next i
End Sub