Office中国论坛/Access中国论坛

标题: 求助：子窗体记录引用问题 [打印本页]

作者: li08hua 时间: 2010-5-6 22:50
标题: 求助：子窗体记录引用问题
各位老师们：
我在引用一个查询子窗体的记录的值时，如引用第二条记录时用：
DoCmd.GoToRecord acDataForm, "Forms![查询窗体]![子窗体]", acGoTo, 2，但得到的却都是第一条记录的值，看了大半天的帮助亦不知所云，不知该如何写才正确？
先谢谢各位老师指教了！

作者: li08hua 时间: 2010-5-6 23:55
置顶啊，老师们！

作者: fnsmydyang 时间: 2010-5-7 21:59
如果每次都要引用第二笔记录,可以这样做:
Dim rs As DAO.Recordset
Set rs = Me.订单子窗体.Form.Recordset
rs.MoveFirst
rs.MoveNext
MsgBox rs(0) '需要引用的值

作者: li08hua 时间: 2010-5-8 14:37
fnsmydyang ，您好，
如果要顺序引用全部记录呢，如要把它的所有记录顺序引用在一个文本框控件中？谢谢！

作者: todaynew 时间: 2010-5-8 16:14
Function reclist(subfrm as form,fldname as string) as string
'功能：读取子窗体指定字段所有记录的值，并返回一个字符串。可用于列表框或组合框数据源。
'参数：subfrm--子窗体；fldname--读取的字段名称
'示例：me.学生姓名..RowSource=reclist(me.学生表子窗体.form,"姓名")
For i = 1 To frm.RecordsetClone.RecordCount
frm.Form.SelTop = i
reclist=reclist & frm.Form.controls(fldname) & ";"
Next
end function

作者: li08hua 时间: 2010-5-8 19:26
谢谢todaynew。您是前辈了，请多多指教！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)