IN VB6 MINIMIZE AND MAXIMIZE A FORM

I have a program wich does some checking. I use a timer to do this every 2 minutes
What would be the syntax to get this situation.
Private Sub tmrFaxen_Timer()
'=============================
If FileExist("faxsend.doc") = True Then
' WHAT SYNTAX HERE TO MAXIMIZE ???????  , SO USER SEES IT SEND THE FAX
SendMyFax
'HERE COMMING BACK AFTER SENDING FAX
'WHAT SYNTAX TO PUT BACK MINIMIZED????
End If
tmrFaxen.Interval = 120000  ' restart
End Sub

BIAPROAsked:
Who is Participating?
 
fostejoCommented:
BIAPRO,

It's sounds like the WindowState property may well meet your requirements. You snippet would then look like:

Private Sub tmrFaxen_Timer()
'=============================
If FileExist("faxsend.doc") = True Then
  Me.WindowState=vbMaximized
SendMyFax
  Me.WindowState=vbMinimized
End If
tmrFaxen.Interval = 120000  ' restart
End Sub

Hope that helps..
0
 
BIAPROAuthor Commented:
Ok, this works , only one qst,   this form is at start time set to  height  5000 and with 8600,
if reshows, it goes to full screen,  option to let it pop-up with original  size???

Thanks  ,
Jack
0
 
BIAPROAuthor Commented:
Me dummy, offcourse,  vbNormal  would do it,
Now is just fine
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.