Access VBA教程:CurrentSectionLeft属性

应用该属性可以确定从当前节的左边到窗体的左边的距离,以缇为单位。

expression.CurrentSectionLeft

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

此属性设置仅在使用Visual Basic 时才可用。

用户滚动窗体时,CurrentSectionLeft属性的设置将会改变。

对于DefaultView 属性设置为“单一窗体”的窗体,如果用户滚动窗体至左边缘的右侧,属性设置值将为负值。

CurrentSectionLeft属性用于查找“窗体”视图中连续窗体的或“数据表”视图中的主体节位置。

VBA示例

下面的示例显示了连续窗体上一个控件的 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

上页:Access VBA教程:CurrentRecord属性 下页:Access VBA教程:CurrentSectionTop属性

Access VBA教程:CurrentSectionLeft属性

Access VBA教程:CurrentSectionTop属性 Access VBA教程:CurrentView属性
Access VBA教程:CurrentX属性 Access VBA教程:CurrentY属性
Access VBA教程:Custom属性 Access VBA教程:Cycle属性
Access VBA教程:DataAccessPages属性 Access VBA教程:Database属性
Access VBA教程:DataChange属性 Access VBA教程:DataEntry属性
Access VBA教程:DataOnly属性 Access VBA教程:DataSetChange属性
Access VBA教程:DatasheetBackColor属性 Access VBA教程:DatasheetBorderLineStyle属性
Access VBA教程:DatasheetCellsEffect属性 Access VBA教程:DatasheetColumnHeaderUnderlineStyle属性
Access VBA教程:DatasheetFontHeight属性 Access VBA教程:DatasheetFontItalic属性
Access VBA教程:DatasheetFontName属性 Access VBA教程:DatasheetFontUnderline属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号