Darth-Falcon
Legacy Member
ik weer eens een klein probleemke me vb6
ik ben control arrays aan het gebruiken
Private Sub Image1_Click(intindex As Integer)
'nieuw image laden
Load Image1(intindex + 1)
lblload = "object " & intin & " loaded"
Image1(intindex + 1).Visible = True
lblload = lblload & vbCrLf & "object " & intin & " made visible"
'vorige image verzetten
Image1(intindex).Top = 100 + (intindex * 50)
lbloutput = intindex
End Sub
het probleem is dat ik maar 1 extra image kan laten verschijnen, als ik daar dan op klik gaat ie wel lager staan maar komt de 3de image niet tevoorschijn
nvm als ik van boven af begin en intindex laat aftellen werkt het wel (moeten er toch ma 6 zijn)
ik ben control arrays aan het gebruiken
Private Sub Image1_Click(intindex As Integer)
'nieuw image laden
Load Image1(intindex + 1)
lblload = "object " & intin & " loaded"
Image1(intindex + 1).Visible = True
lblload = lblload & vbCrLf & "object " & intin & " made visible"
'vorige image verzetten
Image1(intindex).Top = 100 + (intindex * 50)
lbloutput = intindex
End Sub
het probleem is dat ik maar 1 extra image kan laten verschijnen, als ik daar dan op klik gaat ie wel lager staan maar komt de 3de image niet tevoorschijn

nvm als ik van boven af begin en intindex laat aftellen werkt het wel (moeten er toch ma 6 zijn)