UC知道VB九九乘法表
来源：百度知道 编辑：UC知道 时间：2024/06/19 23:43:20
Option Explicit
Private Sub Form_Load()
Dim i As Integer
Dim j As Integer
Print String(56, "-")
Print Tab(25); "九九乘法表"
Print String(56, "-")
For i = 0 To 9
Print Tab(i * 6); i;
Next i
Print
For j = 1 To 9
Print j;
For i = 1 To j
Print Tab(i * 6); j * i;
Next i
Print
Next j
End Sub
上面的是代码
其他还朦朦胧胧的似懂非懂的感觉
特别是Print Tab(i * 6); i;这个怎么也看不明白啊
Private Sub Form_Load()
Dim i As Integer
Dim j As Integer
Print String(56, "-")
Print Tab(25); "九九乘法表"
Print String(56, "-")
For i = 0 To 9
Print Tab(i * 6); i;
Next i
For j = 1 To 9
Print j;
For i = 1 To j
Print Tab(i * 6); j * i;
Next i
Next j
End Sub
上面的是代码
其他还朦朦胧胧的似懂非懂的感觉
特别是Print Tab(i * 6); i;这个怎么也看不明白啊
Print String(56, "-") '56个"-"
Print Tab(25); "九九乘法表" '25个跳格键Tab之后，打印"九九乘法表"
Print String(56, "-")
For i = 0 To 9
Print Tab(i * 6); i; '每隔6个跳格键Tab，打印i。如i=0时，在开始位置打印0；i=1时，从开始位置算起的6个Tab之后打印1
'i=2时，从开始位置算起的2*6个Tab之后打印2；…
Next i
'下边有两层for，自己思考下吧
For j = 1 To 9
Print j;
For i = 1 To j
Print Tab(i * 6); j * i;
Next i
Print '换行
Next&