rst.absoluteposition？我不会用啊，555作者: ADAM 时间: 2003-10-10 21:35
DIM RST AS DAO.RECORDSET
SET RST=CURRENTDB.OPENRECORDSET("數據表名稱")
MSGBOX RST.ABSOLUTPOSITION
RST.CLOSE
ok>>> 作者: 唐小小 时间: 2003-10-11 00:49
真是太谢谢了，呵呵，我还有好多问题想请教，我的QQ是6671492，
先问一个吧，有没有什么好方法达到以下效果？
在主窗体中选择一条记录，有姓名，学号等字段，如何使子窗体的当前记录定位到这条相同的记录，例如主窗体中有1，2，3三条记录，子窗体中有a,b,c,1,2,3,当我选择主窗体中的第三条记录时，子窗体可不可以自动定位到第六条记录？可能说的不是太清楚，求求大家帮我啊！作者: 阿罗 时间: 2003-10-11 01:24
小小: 简单啊简单。大致意思酱紫的，你改成你设计的控件名称试一试
private sub form_current()
dim rst as new adodb.recordset
set rst = me.childform.form.recordclone
rst.find "[theID]=" & me.txtBoxID
me.childform.form.bookmark = rst.bookmark
set rst = nothing
end sub
[em03][em03][em03][em03][em03][em03]作者: 唐小小 时间: 2003-10-11 05:50
阿罗啊，受不了了，提示类型不匹配，5555，如何是好啊？
Dim rst As New ADODB.Recordset
Set rst = Me.全年级成绩表.Form.RecordsetClone
rst.Find "[学号]=" & Me.学号
Me.全年级成绩表.Form.Bookmark = rst.Bookmark
Set rst = Nothing
[此贴子已经被作者于2003-10-10 22:36:46编辑过]
作者: 阿罗 时间: 2003-10-11 12:35
对不起小小，今天来晚了。 不知道具体是什么样的情况。
从你的代码，看上去好像是一般的主-子窗体啊？这难道还要写代码？
要不你再这样试试看：
Private Sub Form_current()
forms("全年成绩表").form.recordSource = "Select " _
& " * FROM [那个成绩表] WHERE [学号] = " & me.[学号]
end Sub
要实在不行，你做个简单的例子上来我帮你写。作者: 阿罗 时间: 2003-10-12 01:36
小小，你的库我收到了，看了以后，我还是没能理解你的意思。看上去好像你已经做到了你想要的效果了？ 例如，成绩查询窗体，选择了初四三班，一共有4条记录（两个同学每个同学两个学期）。当你在主窗体上移动记录的时候，子窗体的记录不是也跟着移到相同的记录了么？作者: 唐小小 时间: 2003-10-12 16:56
阿罗，可能是我说的不太明白，这个效果我可以达到，不知道你注意了吗，当我们选择了学期与班级后，我想使主表显示这个班级的情况，子表显示整个年级的情况，在主表中选择一个学生的时候，子表就自动定位到这个学生在整个年级中的排名？本来我的主表与子表的数据源是不同的，但我在主表的当前设置了一句语句，结果是可以同步变化了，但子表的数据源却变得与主表一样了，如果还不是太明白，QQ留言给我吧，告诉我你的电话，我打电话给你好吗？
另外趁阿罗升级之际，祝前程似锦，一帆风顺！