Private Sub Command1_Click()

来源:百度知道 编辑:UC知道 时间:2024/04/27 16:16:37
For i = 2 To 6 Step 2
For j = 2 To i
Print"*";
Next i
Next i
End Sub
每行显示几个"*"

For i = 2 To 6 Step 2 'I = 2,4,6
For j = 2 To i ' I =2 时 显示1个,I=4 显示3个,I=6显示5个
Print"*";
Next i
Next i
End Sub

结果应该是这样的吧
*
***
******
去VB上验证一下

哦,是显示9个“*”,因为你Print"*"; 这句最后的那个分号是把所有的*连在一起,所以这有一行
另外这句错了
Next i
Next i
应该为
Next j
Next i

楼上回答完全正确