Is er een mogelijkheid om op een userform meerdere afbeeldingen te laten verschijnen op één bepaalde locatie? Ik voeg die toe via de werkset -> afbeelding. Maar dat is altijd maar 1 foto. Mocht het mogelijk zijn had ik daar graag een 5-tal foto's verkregen die willekeurig telkens verschillen.
"Dé grootste en gratis computerhelpdesk van Nederland"
Meer afbeeldingen in userform
- Onderwerp starter Kevinva
- Startdatum
- Status
HSV
Inventaris
- Lid geworden
- 18 jul 2008
- Berichten
- 20.324
- Office versie
- Office 365
Bv.
5 foto's om de 2 seconden een andere.
Zet een 'Image' control op het formulier en pas het pad aan waar de foto's staan.
De foto's hebben de naam "afb0001.jpg" t/m afb0005.jpg"
5 foto's om de 2 seconden een andere.
Zet een 'Image' control op het formulier en pas het pad aan waar de foto's staan.
De foto's hebben de naam "afb0001.jpg" t/m afb0005.jpg"
Code:
Private Sub UserForm_activate()
Dim x As Long
For x = 1 To 5
Image1.Picture = LoadPicture("c:\users\Kevinva\pictures\afb000" & x & ".jpg")
DoEvents
Application.Wait DateAdd("s", 2, Now)
Next x
End Sub- Status
