
vb程序设计如何设计一个正三角形?请给出编写程序,谢谢!
1个回答
展开全部
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To 10
Print Space(20 - i);
For j = 1 To 2 * i - 1
Print "*";
Next j
Print
Next i
End Sub
Dim i As Integer
For i = 1 To 10
Print Space(20 - i);
For j = 1 To 2 * i - 1
Print "*";
Next j
Next i
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询