你提的问题比较怪, 不是技术上有难度,而是都不符合惯例!
子窗体都是与主窗体关联, 子窗体显示什么,自己是说了不算的。
如果像你说的,子窗体只想显示前10条,那么与主窗体还有关系吗?
如果没有关系, 那么还叫子窗体干吗? 叫法有问题!
好! 来回答你的技术问题:
暂时称这个子窗体为 “frmA". frmA 的记录源为: tblA.
tblA 里的时间排序(你自己的原字段)叫 "某DATE" ,
在 tblA 里添加新字段 ‘序号’, 在 frmA 的 Form_load 里
添加代码:
Private Sub Form_Load()
Dim strRS As String
strRS = "SELECT tblA.* FROM tblA ORDER BY tblA.某DATE DESC"
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open strRS, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
Dim N As Long
N = 1
Do While Not rs.EOF
rs.Fields("序号") = N
rs.Update
N = N + 1
rs.MoveNext
Loop
Me.RecordSource = "SELECT tblA.* FROM tblA WHERE (((tblA.序号)<11)) ORDER BY 序号"
End Sub
OK 了!!!