property Calc.CalcWidth as Long
Gets the width in pixels of the painted area.

TypeDescription
Long A long expression that indicates the height in pixels of the control to fit all the buttons in the control's client area.
Use the CalcHeight and CalcWidth properties to get the size of the control to fit all the buttons inside the control's client area. Use the Buttons property to customize the control's matrix of buttons.  Use the ButtonHeight and ButtonWidth property to specify the height and the width of the buttons in the control. The CalcWidth and CalcHeight properties does not include the size of the borders. Use the Appearance property to remove the control's borders.

The following sample resizes the control to fit all the buttons in the control's visible area:

Private Sub Form_Resize()
    With Calc1
        .Width = .CalcWidth * Screen.TwipsPerPixelX
        .Height = .CalcHeight * Screen.TwipsPerPixelY
    End With
End Sub