VB6 eliminare label create con load in altra SUB

[timido]

Salve a tutti.
Sono nuovo di questo forum ed avrei bisogno del vostro aiuto.

in una sub di VB6 creo una serie di label e textbox con il comando LOAD

Set tvp = ActiveSheet.Columns(1).Find(WHAT:=ProtDip, LOOKIN:=xlValues, LOOKAT:=xlWhole)
    CPV = 2
    Do While ActiveSheet.Cells(tvp.Row, CPV) <> ""
        NVA = CPV - 2
        If NVA = 0 Then
            Label7(NVA) = ActiveSheet.Cells(tvp.Row, CPV)
        Else
            Load Label7(NVA)
            Label7(NVA).Top = 2880 + (NVA * 285)
            Label7(NVA) = ActiveSheet.Cells(tvp.Row, CPV)
            Load Text1(NVA)
            Text1(NVA).Top = 2880 + (NVA * 285)
            Text1(NVA) = ""
            Label7(NVA).Visible = True
            Text1(NVA).Visible = True
        End If
        CPV = CPV + 1
    Loop

e ho bisogno di eliminare le label e le textbox da altra sub ma usando UNLOAD và in errore