神马品牌网普渡大学西北校区:用vb循环显示九九表(两层循环嵌套）给代码
来源：百度文库 编辑：神马品牌网 时间：2024/04/30 01:43:00
Private Sub Form_Click()
For i = 1 To 9
For j = 1 To 9
If j >= i Then
Print j & "*" & i & "="; i * j
Exit For
Else
Print j & "*" & i & "="; i * j;
End If
Next
Next
End Sub
Private Sub Form_Click()
Dim i As Integer
Dim j As Integer
Dim strE As String
Print Tab(35); "九九乘法表"
Print Tab(35); "=========="
For i = 1 To 9
For j = 1 To 9
strE = i & "×" & j & "=" & i * j
Print Tab((j - 1) * 9 + 1); strE;
Next j
Print
Next i
End Sub
Private Sub Form_Load()
Form1.Width = 7500
Form1.Height = 3000
End Sub
自己研究一下吧
希望对你有帮助
以后这样的问题自己也就可以解决了
要对自己有信心~