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,不好意思