Member Avatar for jisjake
jisjake 0 Newbie Poster

Hi I'm trying to creat a numeric pyramid.
I have created th code for one side but can't seem to figure out how to do the other side
this is what I have so far.

size = Val(txtsize.Text)
Picout.Cls
' For loop to iterate over every column
Dim row As Integer
Dim col As Integer

For row = 1 To size

For col = 1 To row
Picout.Print col;

Next col

Picout.Print

Next row
End Sub

If i could get som direction on how to reverse this to cobine it with the code above I would appreciat it.

  • 1 Contributor
  • 0 Replies
  • 51 Views
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.