中科新闻网西固区康乐路道路规划:VB for next循环
来源：百度文库 编辑：中科新闻网 时间：2024/05/11 03:09:17
＊＊＊＊＊＊＊
＊＊＊＊＊
＊＊＊
＊
＊＊＊＊＊
＊＊＊
＊
Dim tempString As String
tempString = ""
For i As Integer = 3 To 0 Step -1 '控制行,步长 -1
For y As Integer = 1 To i * 2 + 1 '控制列
tempString = tempString & "＊"
Next
tempString = tempString & Chr(10) & Chr(13) '换行
Next
Print tempString '打印