I have this so far:
Private Sub CommandButton1_Click()
Image1.Picture = LoadPicture("C:\Documents and Settings\Owner\Desktop\pic1.bmp")
Application.Wait Now() + TimeValue("00:00:01")
Image1.Picture = LoadPicture("C:\Documents and Settings\Owner\Desktop\pic2.bmp")
Application.Wait Now() + TimeValue("00:00:01")
Image1.Picture = LoadPicture("C:\Documents and Settings\Owner\Desktop\pic3.bmp")
Application.Wait Now() + TimeValue("00:00:01")
Image1.Picture = LoadPicture("C:\Documents and Settings\Owner\Desktop\pic4.bmp")
Application.Wait Now() + TimeValue("00:00:01")
Image1.Picture = LoadPicture("C:\Documents and Settings\Owner\Desktop\pic5.bmp")
Application.Wait Now() + TimeValue("00:00:01")
End Sub
Private Sub Image1_Click()
Unload UserForm1
End Sub
so when i show the userform, the pics begin to display one at a time, with 1 second intervals, and when i click it, the userform is closed. What i want to do is when i click it, the pics stop changing, it stays still.
then finally id like to see if there is a way to make an if statement, if the picture at which it was stopped is pic1 then msgbox "pic1" -- if the picture at which it was stopped is pic2 then msgbox "pic2" etc etc