|
<>做一个查询窗体:查询符合条件的前N条记录,并将这前N条记录打印下来.</P>
<>因为含有"top n"语句,窗体的记录源不得不用编程方法来实现.窗体能正确显示.</P>
<>报表的记录源也应用编程方法来实现(这是一个按钮的脚本的一部分)</P>
<P>Dim N As Integer<BR>N = IIf(IsNull(Me.序号.Value), 10000, Me.序号.Value)<BR>reports.报表.report.RecordSource = "select top " & N & " 企业.序号, 企业.乡镇, 企业.企业名称 FROM 企业 WHERE " & _<BR> "Not(isnull(Forms!主窗口!child1!显示)) and " & _<BR> "(企业.乡镇 Like IIf(IsNull(Forms!主窗口!child1!乡镇),'*',Forms!主窗口!child1!乡镇)) and " & _<BR> "(企业.企业地址 Like IIf(IsNull(Forms!主窗口!child1!企业地址),'*',Forms!主窗口!child1!企业地址)) and " & _<BR> "order by 交易.数量 desc "</P>
<P>会出现错误----运行时错误'438':对象不支持该属性或方法,请问该如何操作?谢谢!</P> |
|