Jag knåpar med ett program som positionerar Jag menar : Hej Har gjort ett litet exempel:Ändra på kontrollarray(index)
flera Lablar efter en lista i en textfil som jag skriver in
Unloada alla Lablar så jag kan uppdatera textfilen utan att
stänga av programmet.Sv: Ändra på kontrollarray(index)
Jag vill ta bort alla Labelkontroller ur minnet & på skärmen som jag Loadat in i en kontrollarraySv: Ändra på kontrollarray(index)
For Each element In group
[statements]
'tex. Unload Label1(10)
[Exit For]
[statements]
Next [element]
mvh
SvenSv: Ändra på kontrollarray(index)
' * Skapa ett nytt Standard EXE Projekt
' * Lägg till en Label och två Command knappar
' * Sätt Index för Label1 till 0
' * Klistra in följande kod:
Private Sub Command1_Click()
Dim Index As Long
Dim Current As Label
Dim Previous As Label
Set Previous = Label1(0)
For Index = 1 To 10
Set Current = Label1(Index)
Load Current
Current.Move Previous.Left, Previous.Top + Previous.Height
Current.Visible = True
Set Previous = Current
Next
End Sub
Private Sub Command2_Click()
Dim Index As Long
For Index = 1 To Label1.UBound
Unload Label1(Index)
Next
End Sub