Top (propiedad)

Se aplica a

Puede usar la propiedad Top para especificar la ubicación de un objeto en un formulario o informe. Entero de lectura y escritura para todos los objetos de la lista Se aplica a menos el objeto Report, que es de tipo Long de solo lectura.

expresión Requerido. Una expresión que devuelve uno de los objetos anteriores.

Observaciones

La ubicación de un control es la distancia medida desde el borde izquierdo o superior hasta el borde izquierdo o superior de la sección que contiene el control. Establecer la propiedad Top en 0 coloca el borde del control en la parte superior de la sección. Para usar una unidad de medida distinta de la configuración del cuadro de diálogo Opciones regionales de Windows Panel de control, especifique la unidad, como cm o in (por ejemplo, 3 cm o 2 pulgadas).

En Visual Basic, use una expresión numérica para establecer el valor de esta propiedad. Los valores se expresan en twips.

Para los controles, puede establecer esta propiedad mediante la hoja de propiedades del control, una macro o código de Visual Basic para Aplicaciones (VBA)

Al mover un control, el nuevo valor de la propiedad Top se escribe automáticamente en la hoja de propiedades. Al ver un formulario o informe en Vista preliminar o al imprimir un formulario, la ubicación de un control está determinada por el valor de su propiedad Top junto con la configuración de márgenes del informe, disponible al hacer clic en Márgenes en la pestaña Diseño de página.

Para los informes, el valor de la propiedad Top es la cantidad que se desplaza la sección actual desde la parte superior de la página. El valor de esta propiedad se expresa en twips. Puede usar esta propiedad para especificar en el procedimiento de evento Format de la sección la distancia vertical en la página a la que quiere que se imprima una sección.

Ejemplo

En el ejemplo siguiente se comprueba el valor de la propiedad Top del informe actual. Si el valor es menor que la configuración de márgenes mínima, las propiedades NextRecord y PrintSection se establecen en False. La sección no avanza al registro siguiente y no se imprime la sección siguiente.

Sub Detail1_Format(Cancel As Integer, _
    FormatCount As Integer)
Const conTopMargin = 1880
' Don't advance to next record or print next section
' if Top property setting is less than 1880 twips.
    If Me.Top < conTopMargin Then
        Me.NextRecord = False
        Me.PrintSection = False
    End If
End Sub