Form.CurrentSectionTop-Eigenschaft (Access)

  • Artikel

Verwenden Sie diese Eigenschaft, um den Abstand in Twips vom oberen Rand des aktuellen Abschnitts zum oberen Rand des Formulars zu bestimmen. Ganze Zahl mit Lese-/Schreibzugriff.

Syntax

Ausdruck. CurrentSectionTop

expression Eine Variable, die ein Form-Objekt darstellt.

HinwBemerkungeneise

Die Einstellung der CurrentSectionTop-Eigenschaft ändert sich immer dann, wenn ein Benutzer einen Bildlauf durch ein Formular durchführt.

Bei Formularen, deren DefaultView-Eigenschaft auf Single Form festgelegt ist, sind die Eigenschafteneinstellungen negative Werte, wenn der Benutzer über die obere linke Ecke des Abschnitts scrollt.

Bei Formularen, deren DefaultView-Eigenschaft auf Continuous Forms festgelegt ist, ist die CurrentSectionTop-Eigenschaft gleich der InsideHeight-Eigenschaft des Formulars, wenn ein Abschnitt nicht sichtbar ist.

Die CurrentSectionTopCurrentSectionTop-Eigenschaft ist hilfreich, um die Position von in der Formularansicht angezeigten Detailausschnitten zu finden, die als Endlosformulare oder in der Datenblattansicht angezeigt werden. Jeder Detailausschnitt verfügt über eine eigene Einstellung der CurrentSectionTopCurrentSectionTop-Eigenschaft, die von der Position des Bereichs im Formular abhängt.

Beispiel

Im folgenden Beispiel werden die Eigenschafteneinstellungen CurrentSectionLeft und CurrentSectionTop für ein Steuerelement in einem fortlaufenden Formular angezeigt. Wenn der Benutzer zu einem neuen Datensatz wechselt, werden die Eigenschafteneinstellungen für den aktuellen Abschnitt in der Bezeichnung lblStatus in der Kopfzeile des Formulars angezeigt.

Private Sub Form_Current() 
 
 Dim intCurTop As Integer 
 Dim intCurLeft As Integer 
 
 intCurTop = Me.CurrentSectionTop 
 intCurLeft = Me.CurrentSectionLeft 
 Me!lblStatus.Caption = intCurLeft & " , " & intCurTop 
 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.