用VB语言打印如下图所示九九乘法表:

如题所述

第1个回答  2009-04-30
修改窗口AutoReDraw属性为true

复制以下代码
Private Sub Form_Load()
Dim i, j As Long
Dim s As String
Print " 九九乘法表"
For i = 1 To 9
s = ""
For j = 1 To i
s = s & i & "x" & j & "=" & i * j & vbTab
Next
Print s
Next
End Sub
第2个回答  2019-12-13
Private Sub Command1_Click()
Me.AutoRedraw = True
For i = 1 To 9
For j = 1 To i
Print Tab(j * 9 + 1); j & "*" & i & "=" & i * j;
Next j
Print
Next i
End Sub
第3个回答  2009-05-05
for i=1 to 9
for j=1 to i
x=j*i
print i;"*";j;"=";x;
next j
print
next i
第4个回答  2009-04-30
百度知道里很多的..
第5个回答  推荐于2016-03-29
主语句:
int a[10] //定义一个一维变量,里面10个变量
for(i=0;i<=9;i++)
for(j=0;j<=9;j++)
制造两个循环
int sum;
sum=i*j
再用SUM去存I*J结果本回答被提问者采纳
相似回答