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.