Поделиться через


Свойство Form.CurrentSectionTop (Access)

Используйте это свойство, чтобы определить расстояние в твипах от верхнего края текущего раздела до верхнего края формы. Для чтения и записи, Integer.

Синтаксис

expression. CurrentSectionTop

выражение: переменная, представляющая объект Form.

Замечания

Параметр свойства CurrentSectionTop изменяется каждый раз, когда пользователь прокручивает форму.

Для форм, для которых свойство DefaultView имеет значение Single Form, если пользователь прокручивается над левым верхним углом раздела, параметры свойства являются отрицательными значениями.

Для форм, для которых свойство DefaultView имеет значение Непрерывные формы, если раздел не отображается, свойство CurrentSectionTop равно свойству InsideHeight формы.

Свойство CurrentSectionTop полезно для поиска позиций разделов сведений, отображаемых в представлении формы в виде непрерывных форм или в режиме таблицы. Каждый раздел сведений имеет разные параметры свойства CurrentSectionTop в зависимости от положения раздела в форме.

Пример

В следующем примере отображаются параметры свойств CurrentSectionLeft и CurrentSectionTop для элемента управления в непрерывной форме. Каждый раз, когда пользователь переходит к новой записи, параметры свойств для текущего раздела отображаются в метке lblStatus в заголовке формы.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.