请高手支招:如何用VB编写一个九九乘法表

来源:百度知道 编辑:UC知道 时间:2024/09/23 02:15:53
谢谢了
我是 初学者
帮帮我
我会感谢你的

dim i%,j%
For i = 1 To 9
For j = 1 To i
print i & "×" & j & "=" & "i * j";
Next
print
Next

调试好的99表,绝对正确,你试试

Private Sub Form_Load()
Show
FontSize = 12
Print Tab(25); 九九表"
Print
Print "*";
For i = 1 To 9
Print Tab(i * 6); i;
Next
Print
For j = 1 To 9
Print j; "";
For k = 1 To 9
m = j * k
Print Tab(k * 6); m; "";
Next
Print
Next
End Sub

for i=1 to 9
for j=1 to i
print(i+"*"+j+"="+i*j);
next j;
print("\n"); //换一下行
next i;