好吧问答库 > VB怎么像这样的用数字组成矩形，还有等腰三角形，乘法表。求高手解答啊

VB怎么像这样的用数字组成矩形，还有等腰三角形，乘法表。求高手解答啊

2024年11月21日 18:01

有2个网友回答

网友（1）：

Private Sub Command1_Click() '矩形
For i = 1 To 9
For i1 = 1 To 9
Print i1 & " ";
Next
Print
Next
End Sub

Private Sub Command2_Click() '三角型
For i = 1 To 9
For i1 = 1 To i
Print i1 & " ";
Next
Print
Next
End Sub

Private Sub Command3_Click() '乘法表
Dim k As String * 7
For i = 1 To 9
For i1 = 1 To i
k = i1 & "×" & i & "=" & i1 * i
Print k;
Next
Print
Next
End Sub

网友（2）：

用for 循环不是一句两句说得清的推荐你金文主讲的vb计算机教程第八章有详细介绍