vb 打出倒三角效果 vb For i = 4 To 1 Step -1 为什么可以使行数倒着打啊?
答案:2 悬赏:40
解决时间 2021-03-06 09:54
- 提问者网友:呆萌心雨
- 2021-03-05 15:02
vb 打出倒三角效果 vb For i = 4 To 1 Step -1 为什么可以使行数倒着打啊?
最佳答案
- 二级知识专家网友:没感情的陌生人
- 2021-03-05 15:36
Option Explicit
Private Sub Command1_Click()
Dim r As Integer, p As Integer, cs As String
Dim i As Integer, j As Integer
r = 9 '要打印的行数
cs = "*" '要打印的字符
For i = 1 To r
For j = r - i To 1 Step -1
cs = cs & "**"
Next j
Print Space(i) & cs
cs = ""
Print
Next i
End Sub
Private Sub Command1_Click()
Dim r As Integer, p As Integer, cs As String
Dim i As Integer, j As Integer
r = 9 '要打印的行数
cs = "*" '要打印的字符
For i = 1 To r
For j = r - i To 1 Step -1
cs = cs & "**"
Next j
Print Space(i) & cs
cs = ""
Next i
End Sub
全部回答
- 1楼网友:荒唐后生
- 2021-03-05 16:50
你好!
初值是4,终值是1,步长为负壹,循环变量取初值,每循环一次循环变量减1
如有疑问,请追问。
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯
• 手机登qq时,显示手机磁盘不足,清理后重新登 |
• 刺客的套装怎么选啊? |