代码之家 › 专栏 › 技术社区 › MikeAinOz

自定义记录导航

ms-access

0

MikeAinOz · 技术社区 · 16 年前

嗨,我有一个嵌套子窗体的应用程序,记录导航是混乱的,我已经开始移动记录导航控件的窗体顶部,以改善这一点。我被困在“n of n”字段中,是否有一个泛型属性/查询可以给我这个结果?

1 回复 | 直到 16 年前

1

HansUp 16 年前

对于第一个n,使用窗体的RecordsetClone的AbsolutePosition属性。 see MSDN

对于第二个n,使用RecordCount属性。

:我更喜欢Mike使用CurrentRecord的方法。我创建了一个包含两个文本框的表单:txtCurrentRecord和txtRecordCount。然后,窗体的On Current事件的此过程将导致文本框显示与内置导航栏相同的值。

Private Sub Form_Current()
    Me.txtCurrentRecord = Me.CurrentRecord
    If Not Me.NewRecord Then
        Me.txtRecordCount = Me.RecordsetClone.RecordCount
    Else
        Me.txtRecordCount = Me.CurrentRecord
    End If
End Sub

:我为Form Load添加了一个过程,以确保RecordCount是准确的。

Private Sub Form_Load()
    Me.RecordsetClone.MoveLast
    Me.RecordsetClone.MoveFirst
End Sub