关于自动提示的问题

garyding

假设有一个表, 有 "姓名", "电话号码"

如何实现.当这个表里面出现10条相同姓名的数据时,自动弹出提示呢?



谢谢

hi-wzj

用dcount函数可以读取符合条件的记录数。

garyding

thx for ur reply,need to know some detail about Dcount Function...thx a lot

罗生门

如果你是窗体的话,可以设置代码private sub controlname_afterupdate()dim conn as new adodb.connectiondim rst as new adodb.recordsetdim strsql as stringset conn=currentproject.connectionstrsql="select 姓名from tablename where 姓名='"&me.controlname&"'"rst.open strsql,conn,adopenkeyset,adlockoptimisticif rst.recordcount=10 thenmsgbox"已经有10个这样的姓名了"end ifrst.closeset conn=nothingend sub