Propiedad TextBox.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 TextBox .

Observaciones

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 afectar a 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.