VB中有一个可以画出菱形的代码是这样写的
答案:1 悬赏:80 手机版
解决时间 2021-01-21 19:12
- 提问者网友:回忆在搜索
- 2021-01-21 05:55
VB中有一个可以画出菱形的代码是这样写的
最佳答案
- 五星知识达人网友:荒野風
- 2021-01-21 07:28
Private Sub Form_Click()
For i = 1 To 5
For j = 6 - i To 1 Step -1
Print " ";
Next j
For j = 1 To 2 * i - 1
Print "*";
Next j
Print
Next i
For i = 1 To 4
For j = 1 To i + 1
Print " ";
Next j
For j = 1 To 9 - 2 * i
Print "*";
Next j
Print
Next i
End Sub
next j后为什么又要写print,是为了回车
print " ";输出空格为什么引号后面还要加一个分号,是为了不回车,后面的输出继续接在空格后面
For i = 1 To 5
For j = 6 - i To 1 Step -1
Print " ";
Next j
For j = 1 To 2 * i - 1
Print "*";
Next j
Next i
For i = 1 To 4
For j = 1 To i + 1
Print " ";
Next j
For j = 1 To 9 - 2 * i
Print "*";
Next j
Next i
End Sub
next j后为什么又要写print,是为了回车
print " ";输出空格为什么引号后面还要加一个分号,是为了不回车,后面的输出继续接在空格后面
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯