关于VB中tab位置问题
发布网友
发布时间:2022-04-24 01:01
我来回答
共1个回答
热心网友
时间:2022-04-24 02:30
(2)中我这样改:
Private Sub Command1_Click()
Me.ForeColor = vbBlue '这样可以更清淅,下同
Print " *"; Tab(5); '有改动
Me.ForeColor = vbGreen
For i = 1 To 9
Print i; Tab(5 * (i + 1)); '有改动
Next i
Print
For i = 1 To 9
Me.ForeColor = vbGreen
Print i; Tab(5); '有改动
Me.ForeColor = vbBlack
For j = 1 To i
Print i * j; Tab(5 * (1 + j)); '有改动
Next j
Print
Next i
End Sub