如何用VB程序生成五行五列星号方阵？
1个回答
展开全部
Private Sub Form_Click()
Dim i As Integer '定义i为整型变量
Dim j As Integer '定义j为整型变量
For i = -2 To 2
For j = 1 To 3 - Abs(i)
Print String(1, "*");
Next j
Print '换行
Next i
End Sub
这样就满足题意了，试试就知道了！
Dim i As Integer '定义i为整型变量
Dim j As Integer '定义j为整型变量
For i = -2 To 2
For j = 1 To 3 - Abs(i)
Print String(1, "*");
Next j
Print '换行
Next i
End Sub
这样就满足题意了，试试就知道了！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
