怎么用vb编一个由星号组成的等腰三角形 要求第一行一个星号 第二行两个星号
1个回答
展开全部
Dim n As Integer
n = 10
For i = 1 To n
For k = 1 To n - i
Print Chr(32);
Next
For j = 1 To i
Print "*" & Chr(32);
Next
Print ""
Next
放到Form_Paint()里面都可以。
n = 10
For i = 1 To n
For k = 1 To n - i
Print Chr(32);
Next
For j = 1 To i
Print "*" & Chr(32);
Next
Print ""
Next
放到Form_Paint()里面都可以。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
