help needed in VB?

Question

can anyone write the coding for:
5
5 4
5 4 3
5 4 3 2
5 4 3 2 1
anyone??

Answer 1

Dim strLine As String, Dim I as Integer
I = 5
For L = I To 1 Step -1
strLine = strLine & " " & L
Debug.Print strLine
Next L

Hope that will do it!

Helmut

Answer 2

I have 2 answers because I understood the question in 2 different ways.

Answer 1:

i=5
do
print i
i=i-1
loop while i>0

-------------------------------
Answer 2:

i=5
b= i
do
for a=i to b step -1
print a
next a
b= b-1
loop while b>0

Answer 3

I can do it for you but I wont because if I do it then you wont learn will you?

So if you wish to learn then use link below and good luck.

http://www.softcircuits.com/sw_vbsrc.htm