Office中国论坛/Access中国论坛

标题: 如何取得绑定了查询的窗体是否有记录的判断 [打印本页]

作者: 没牙兔兔 时间: 2003-10-12 04:31
标题: 如何取得绑定了查询的窗体是否有记录的判断
当窗体.recordsource赋给一个查询
如果此查询为空，怎么判断FORM的属性得出该查询没有值
源代码见
http://www.accxp.com/club/topic.cgi?forum=2&topic=11443&show=0
需要解决的问题：点击无下属的节点的时候，判断子窗体的记录是否为空，如果为空的话，就更改子窗体的recordsource

另外奢求
能够取到数据导航条上的当前记录数，还有记录总数
知道的留个言啦，谢谢

作者: ADAM 时间: 2003-10-12 16:34
我先回答第二個問題:
1.設定公用物件
public dbs as database
public rst as recordset
public sumcount as long
public abscount as long
2.在窗體開啟事件中設定發下代碼:
set dbs=currentdb
set rst=dbs.openrecordset("某表或某查詢")
sumcount=rst.recordcount

3.在form的current事件中,輸入:
select case rst.absoluteposition
case 1
me.text0="top"
case sumcount
me.text0="last"
case else
me.text0=rst.absoluteposition & "of" & sumcount
end select

作者: ADAM 时间: 2003-10-12 17:25
剛剛說得太復雜了
其實一條語句就可以了....
ME.TEXT0=ME.CURRENTRECORD & " OF " & ME.RECORDSET.RECORDCOUNT
嘿嘿....

作者: 没牙兔兔 时间: 2003-10-13 22:51
嘻嘻，谢谢adam啦，这里谢谢你啦
你的解答好象一场及时雨哦

作者: 没牙兔兔 时间: 2003-10-13 23:21
嘻嘻,两个问题都解决啦

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