Share via


OldBorderStyle Property [Access 2003 VBA Language Reference]

You can use this property to set or returns the unedited value of the BorderStyle property for a form or control. This property is useful if you need to revert to an unedited or preferred border style. Read/write Byte.

expression.OldBorderStyle

expression Required. An expression that returns one of the objects in the Applies To list.

Remarks

For forms, the BorderStyle property uses the following settings.

Setting Visual Basic Description
None 0 The form has no border or related border elements. The form isn't resizable.
Thin 1 The form has a thin border and can include any of the border elements. The form isn't resizable (the Size command on the Control menu isn't available). You often use this setting for pop-up forms. (If you want a form to remain on top of all Microsoft Access windows, you must also set its PopUp property to Yes.)
Sizable 2 (Default) The form has the default border for Microsoft Access forms, can include any of the border elements, and can be resized. You often use this setting for normal Microsoft Access forms.
Dialog 3 The form has a thick (double) border and can include only a title bar, a Close button, and a Control menu. The form can't be maximized, minimized, or resized (the Maximize, Minimize, and Size commands aren't available on the Control menu). You often use this setting for custom dialog boxes. (If you want a form to be modal, however, you must also set its Modal property to Yes. If you want it to be a modal pop-up form, which dialog boxes typically are, you must set both its PopUp and Modal properties to Yes.)

For controls, the OldBorderStyle property uses the following settings.

Setting Visual Basic Description
Transparent 0 (Default only for label, chart, and subreport) Transparent
Solid 1 (Default) Solid line
Dashes 2 Dashed line
Short dashes 3 Dashed line with short dashes
Dots 4 Dotted line
Sparse dots 5 Dotted line with dots spaced far apart
Dash dot 6 Line with a dash-dot combination
Dash dot dot 7 Line with a dash-dot-dot combination
Double solid 8 Double solid lines
  • If the OldBorderStyle property is set to None or Dialog, the form doesn't have Maximize or Minimize buttons, regardless of its MinMaxButtons property setting.

  • If the OldBorderStyle property is set to None, the form doesn't have a Control menu, regardless of its ControlBox property setting.

  • The OldBorderStyle property setting doesn't affect the display of the scroll bars, navigation buttons, the record number box, or record selectors.

Example

The following example demonstrates the effect of changing a control's BorderStyle property, while leaving the OldBorderStyle unaffected. The example concludes with setting the BorderStyle property to its original unedited value.

With Forms("Order Entry").Controls("Zip Code")
   .BorderStyle = 3 ' Short dashed border.
 
    MsgBox "BorderStyle = " & .BorderStyle & vbCrLf & _
        "OldBorderStyle = " & .OldBorderStyle  ' Prints 3, 1.

    .BorderStyle = 2 ' Dashed border.
 
    MsgBox "BorderStyle = " & .BorderStyle & vbCrLf & _
        "OldBorderStyle = " & .OldBorderStyle  ' Prints 2, 1
 
    .BorderStyle = .OldBorderStyle ' Solid (default) border.
        
    MsgBox "BorderStyle = " & .BorderStyle & vbCrLf & _
        "OldBorderStyle = " & .OldBorderStyle  ' Prints 1, 1
End With

Applies to | BoundObjectFrame Object | CheckBox Object | ComboBox Object | CustomControl Object | Image Object | Label Object | Line Object | ListBox Object | ObjectFrame Object | OptionButton Object | OptionGroup Object | Rectangle Object | SubForm Object | TextBox Object