Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Use esta propiedad para establecer o devolver el valor sin editar 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
más sencilla.OldBorderStyle
expresión Variable que representa un objeto TextBox .
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 |
Ejemplo
En el ejemplo siguiente se muestra el efecto de cambiar la propiedad BorderStyle de un control sin que el OldBorderStyle se vea afectado. 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.