On Thu, 05 Jun 1997 18:45:43 GMT, dusen@appgeo.com (Charles Van Dusen) wrote:
>Could some kind souls provide some example code to perform a resize of
>a form whenever a checkbox is clicked?
on the fly:
make a new project; a new form; a checkbox and a label
put the code in the appropiate places:
Private sub
Form_Resize()
Check1.Move 20, 20
Label1.Move 20, Check1.Height + 150
End Sub
Private sub
Check1_Click()
If Check1.Value = 1 Then
Form5.Height = 600 + Check1.Height + Label1.Height
Else
Form5.Height = 600 + Check1.Height
end
If
End Sub
Private sub
Form_Load()
Check1.Caption = "Show me
more"
Label1.Caption = "thank you"
Form5.Height = 600 + Check1.Height
End Sub
Return