Свойство 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 и обратная связь.