vb输出图形 654321 54321 4321 321 21 1

急！谢谢帮助！

Private Sub Command1_Click()
Dim i As Integer, j As Integer, s As String
For i = 6 To 1 Step -1
 For j = i To 1 Step -1
  s = s & j
 Next
 Print s; " ";
 s = ""
Next

End Sub

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/f42mm7qvm7qqpfm77v7.html