Egenskaben Øverst

Gælder for

Du kan bruge egenskaben Top til at angive et objekts placering i en formular eller Rapport. Læs/skriv Heltal for alle objekterne på listen Gælder for undtagen objektet Rapport, der er skrivebeskyttet Lang.

udtryk Påkrævet. Et udtryk, der returnerer et af ovenstående objekter.

Bemærkninger

Et kontrolelements placering er afstanden målt fra dets venstre eller øverste kant til venstre eller øverste kant af den sektion, der indeholder kontrolelementet. Hvis egenskaben Top indstilles til 0, placeres kontrolelementets kant øverst i sektionen. Hvis du vil bruge en måleenhed, der er forskellig fra indstillingen i dialogboksen Internationale indstillinger i Windows Kontrolpanel, skal du angive enheden, f.eks. cm eller i (f.eks. 3 cm eller 2 to" ).

I Visual Basic skal du bruge et numerisk udtryk til at angive værdien af denne egenskab. Værdier udtrykkes i twips.

For kontrolelementer kan du indstille denne egenskab ved hjælp af et kontrolelements egenskabsark, en makro eller VBA-kode (Visual Basic for Applications).

Når du flytter et kontrolelement, angives dets nye indstilling for egenskaben Top automatisk i egenskabsarket. Når du får vist en formular eller rapport i Vis udskrift, eller når du udskriver en formular, bestemmes et kontrolelements placering af indstillingen for egenskaben Top samt rapportens margenindstillinger, som kan ses ved at klikke på Margener på fanen Sidelayout.

For rapporter er indstillingen for egenskaben Top det antal måleenheder, som den aktuelle sektion er forskudt fra toppen af siden. Denne egenskabsindstilling er angivet i twips. Du kan bruge denne egenskab til at angive, hvor langt nede på siden du vil have en sektion til at blive udskrevet, i sektionens hændelsesprocedure Formatér.

Eksempel

Følgende eksempel kontrollerer indstillingen af egenskaben Top for den aktuelle rapport. Hvis værdien er mindre end minimumsindstillingen for margen, angives egenskaberne NextRecord og PrintSection til Falsk. Sektionen går ikke videre til den næste post, og den næste sektion udskrives ikke.

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