Set qz = CurrentDb.OpenRecordset("SELECT 表.* FROM 表 WHERE (((表.号)=[Forms]![窗体]![号]))")
[attach]41893[/attach]作者: 咱家是猫 时间: 2010-4-7 10:19
试试如下改写
dim sqlstr as string
sqlstr="Select * From 表名称 Where 号="& forms!窗体名称!号 &""
如果你的号字段为文本型,则把上句改为
sqlstr="Select * From 表名称 Where 号='"& forms!窗体名称!号 &"'"
然后
Set qz=Currentdb.OpenRecordset(sqlstr)作者: sxgaobo 时间: 2010-4-7 10:34
谢谢版主,OK了!