在VB6中编写的代码
Private Sub Command1_Click()
For i = 1 To 10
Print Space((i - 1) * 7);
For j = i To 10
Print Format(i); "+"; Format(j); "="; Format(i + j, "!@@@");
Next j
Next i
End Sub
效果图如下图
在VB6中编写的代码
Private Sub Command1_Click()
For i = 1 To 10
Print Space((i - 1) * 7);
For j = i To 10
Print Format(i); "+"; Format(j); "="; Format(i + j, "!@@@");
Next j
Next i
End Sub
效果图如下图
