写一个方法,用一个for循环打印九九乘法表

Question

写一个方法,用一个for循环打印九九乘法表

Answer 1

Private Sub Form_Click()
Dim i,j,k As Integer
Print String(100,"*") '打印*号
Print Tab(45); "九九法则"'设置标题
Print String(100,"*")
For i = 0 To 9
Print Tab(i * 8); i; '每8倍数位置打印0-9列
Next i
Print
For j = 1 To 9
Print j; '打印9行
For k = 1 To j
Print Tab(k * 8); j & "X" & k; "=" & j * k; '对应列打印法则表
Next k
Print
Next j
End Sub
应该能明白吧!
没说什么语言,我只给个VB,不好意思