Re-sizable boxes in a form

[malform]

I have a form, the only thing in this form is a rectangle and 2 buttons. I want the rectangle to changes widths at the click of these buttons. Currently I have this set for "on click" for button 1.

Private Sub cmdOpenReport_Click()
SizableBox.Width = 1.875
Me.Repaint
End Sub

When I click it the rectangle goes flat. How can I make this work?

Thank you!

 

[ShaneMan]

I have a form, the only thing in this form is a rectangle and 2 buttons. I want the rectangle to changes widths at the click of these buttons. Currently I have this set for "on click" for button 1.

Private Sub cmdOpenReport_Click()
SizableBox.Width = 1.875
Me.Repaint
End Sub

When I click it the rectangle goes flat. How can I make this work?

Thank you!

Try changing SizableBox.Width = 1.875 to '2700' and see if that gives you what your wanting.

HTH,
Shane

 

[malform]

Weird... That worked.

It didnt give me the size I want, but it didnt shrink it down to a 0 width either.

So what kind of units is it using here? Its obviously not inches like I assumed from the beginning.

 

[Bat17]

twips
LOL

twip: Unit of measurement that is equal to 1/20 of a point, or 1/1440 of an inch. There are 567 twips in a centimeter

Peter