Lock the form size 1

[larrinh]

Is there a way to lock the form size in VB6? I use the following code right now but it produces a runtime error if you attempt to minimize the form which the users must be able to do.

Private Sub Form_Resize()
   Form1.Height = 8175
   Form1.Width = 8550
End Sub

 

[Regg]

You will have to put in a check to see what the window state is before allowing the code to run.

 

[FrancisL]

Just put On Error Resume Next as the first line in Form_Resize

 

[FrancisL]

Or, better still, in the Form properties make BorderStyle 1 and MinButton true then you do not need the resize event at all.

 

[larrinh]

Thanks for the help. They are all good solutions but I have to give the most credit to FrancisL for his second post as it is the way it should be done.

I should have found this solution myself.



**********************************
Time is the fire in which we burn.
**********************************