Make a Subform visible then invisible on timer event.

[Jim Monica]

I want to hide a subform for 15 minutes, then have the form display for 30 seconds, then go away, then cycle again in 15 Minutes and on and on so every 15 minutes it is visible for 30 seconds. I'm already using the on Timer event for the main form that this SF is on.

On a side note, the whole purpoe of this is to get a pop up message to appear for 30 seconds, every 15 minutes, then go away on its own without interupting what the user is doing, so that they don't have to click anything to make the popup go away and it also doesn't move the focus off the main form that they are entering data on. That's why I used a sub form. I'm really stuck on how to do this. Thanks for your help!

[TheSmileyCoder]

In your timer event, you can set the timer value, thus swithcing between the 2 events.

If Me.Timer=15*60*100 then '15 minutes
  'Show form
  me.SubFrm.Visible=True
  Me.Timer  =30*100 '30 seconds
Else
  'Hide Form
  me.SubFrm.Visible=false
  Me.Timer=15*60*100'15 minutes
End If

[NeoPa]

I believe the hundreds (100) in the code should be thousands (1000). The Timer intervals are measured in miliseconds. Also I believe the event property should be the .TimerInterval rather than the .Timer one. Just a few details. Otherwise it should do a nice job for you.

[TheSmileyCoder]

You are absolutely correct. I probably shouldn't post when I am that tired. I have posted the corrected code below:

If Me.TimerInterval=15*60*1000 then '15 minutes 
  'Show form 
  me.SubFrm.Visible=True 
  Me.TimerInterval=30*1000 '30 seconds 
Else 
  'Hide Form 
  me.SubFrm.Visible=False 
  Me.TimerInterval=15*60*1000 '15 minutes 
End If 
 

Thank you for picking up on my slack.

[NeoPa]

More than happy with you pulling so much weight Smiley :-)

[Jim Monica]

Thank YOu both for your replies and VERY helpful information. As always, it worked like a charm! :)

[NeoPa]

Very pleased to hear it Jim :-)