DELETE SHAPE ARRAY - i'm on vb6

[sal21]

I just have a series of shape (array), similar:

shp(0)
shp(1)
...
shp(n)

i need to delete all shape from shp(1) to the and of list, possible, maintain shp(0)

[HansV]

Does this work?

Code: Select all

    Dim i As Long
    For i = shp.UBound To 1 Step -1
        Unload shp(i)
    Next i

[SpeakEasy]

Do you have control array, or an array of controls?

[sal21]

Array of controls

[sal21]

Does this work?

Code: Select all

    Dim i As Long
    For i = shp.UBound To 1 Step -1
        Unload shp(i)
    Next i

Hi Bro. Tks.
I can use the same code for text box(0), text box(1), ecc?

[HansV]

Did the code work? If so, yes.

[SpeakEasy]

If it works, then you have a control array, not an array of controls.