Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Beginner
Aug 6, 1997



Building the Right Environment to Support AI, Machine Learning and Deep Learning

Fixed Dialog Forms in VB3

A VB3 form that has a fixed double border does not show the form's icon in the upper left-hand corner if you have the control box set to True. Here's a way to have a double border (3-D dialog border) form that sports a visible icon as well as the standard close "X" in the upper right-hand corner, similar to the VB4 Fixed Dialog form. Choose the form you want and set BorderStyle to 2 - Sizable, ControlBox to True, and MaxButton and MinButton to False, and set the form's icon to your application's ICO file. Place this code in the form events:
(general) (declarations)
Dim MeHeight As Integer
Dim MeWidth As Integer

Sub Form_Load ()
	MeHeight = Me.Height
	MeWidth = Me.Width
End Sub

Sub Form_Resize ()
	Me.Height = MeHeight
	Me.Width = MeWidth
End Sub
When the user tries to resize the form, the sizing rectangle will be visible, but the form will snap back to its former size.
Ken Zinn
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date