form width 1

[and0b]

I'm creating for at run time:
Dim frm As Form

Set frm = CreateForm

frm.NavigationButtons = False
frm.Width = 500

why I can remove navigation buttons but not size??? Can someone help me with that?

 

[and0b]

I'm sorry, I was not clear - I want to change width of the form.

 

[fneily]

Have you looked at Movesize?

 

[missinglinq]

What is your statement actually doing, if anything, to the form's size? If frm.Width = 500 works it will set the form's width to approximately 1/3 of an inch, as the unit of measure for this is twips, with 1440 twips = 1 inch.

Also, Access will not allow a form to be sized down to the point that controls on the form are obliterated.

If you create a form that is, say, 4 inches wide, and place a textbox on it that is 1" from the left hand border of the form and is 2" wide, then in Design View, try to grab the form's border and attempt to decrease the width of the form to 2" Access won't let you, because it would obliverate half of the textbox.

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[and0b]

Problem is so I want to chcange size of the form during run time. I did try also other numbers for form width none was working.

 

[missinglinq]

Where Inches is a variable holding the width (in inches) you want:

Private Sub Form_Load()
 Dim Inches as Single
 DoCmd.MoveSize , , 1440 * Inches
End Sub

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!