PDA

View Full Version : Form Picture help



Emoncada
08-27-2010, 10:02 AM
I wanted to know if this is possible.

Is it possible when someone clicks a button for it to make a picture visible for a certain amount of seconds then hide the picture?

austenr
08-27-2010, 10:25 AM
try something like this untested:

replace the msgbox logic with your picture

Sub exceltimer()
Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to Get a Break Reminder", 4)) = vbYes Then
PauseTime = 10
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
' your routine here

Loop
Finish = Timer
TotalTime = Finish - Start
MsgBox "Break lasted for " & TotalTime & " seconds"
Else
End
End If
End Sub

Emoncada
08-27-2010, 10:37 AM
I think that will work, I will do some more testing.

Emoncada
08-27-2010, 10:38 AM
Pause time works by seconds? is
Pausetime = 10

equal 10 seconds?

austenr
08-27-2010, 10:59 AM
yes