vb编程题：第一行输出5个5，第二行输出4个4，第三行输出3个3，第四行输出2个2，第五行输出1个1

你的程序不好实现,Print语句只能输出一行,如果一定是要这样的话,那就只有硬来的了.

我的程序是一行一行的

Private Sub Form_Load()
On Error Resume Next
Me.WindowState = 2
End Sub

Private Sub Form_Click()
On Error Resume Next
Dim lpRow, lpCol, h, Count As Integer
For lpRow = 1 To 6
For lpCol = 1 To h
Count = lpCol
Print Count
Next
h = lpRow
Print ""
Next
End Sub

for i=5 to 1 step -1
print string(i,i)
next

for i=5 to 1 step -1
println(i)
next

你好！
for
i=5
to
1
step
-1
print
string(i,i)
next
希望对你有所帮助，望采纳。