自定义记录导航

时间:2010-09-27 04:55:51

标签: ms-access

您好我有一个嵌套子窗体的应用程序,记录导航令人困惑,我已经开始将记录导航控件移动到窗体的顶部以改善它。我被困在'n'字段中,是否有一个通用的属性/查询会给我这个?

1 个答案:

答案 0 :(得分:1)

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

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

更新:我更喜欢迈克使用CurrentRecord的方法。我创建了一个包含2个文本框的表单: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

Update2 :我向Form Load添加了一个过程,以确保RecordCount准确无误。

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