Compartir a través de


Propiedad CheckBox.OldBorderStyle (Access)

Utilice esta propiedad para establecer o devolver el valor no editado de la propiedad BorderStyle para un formulario o control. Esta propiedad es útil si necesita volver a un estilo de borde sin editar o preferido. Byte de lectura y escritura.

Sintaxis

expresión. OldBorderStyle

Expresión Variable que representa un objeto CheckBox .

Comentarios

La propiedad OldBorderStyle utiliza los valores siguientes.

Configuración Visual Basic Descripción
Transparente 0 (Predeterminado solo para etiqueta, gráfico y subinforme) Transparente
Sólido 1 (Valor predeterminado) Línea sólida
Guiones 2 Línea de guiones
Guiones cortos 3 Línea de guiones cortos
Puntos 4 Línea punteada
Puntos separados 5 Línea punteada con puntos de espacios
Guión punto 6 Línea con una combinación de punto y guión
Guión-punto-punto 7 Línea con una combinación de guión-punto-punto
Sólido doble 8 Líneas sólidas dobles

Ejemplo:

En el ejemplo siguiente se muestra el efecto de cambiar la propiedad BorderStyle de un control sin afectar al OldBorderStyle . El ejemplo termina estableciendo la propiedad BorderStyle a su valor sin editar original.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.