[求助]---参数无法传递！——菜鸟问题

酣畅淋漓

菜鸟写了以下代码，可运行后提示要求输入参数n的值，为何我的赋值不能被传递，谢谢！
    private sub form_load()
          dim sql as string
          dim n as integer
          for n = 1 to 5
              sql = "insert into 表2 select * from 表1 where 表1.姓名 = dlookup('姓名','表1','工号 =' & n)"
              docmd.runsql sql
          next n
   end sub
'如果我按提示的要求输入n = 4,则一切运行正常.

yedaoan

关键是这句改成这样试试看
sql = "insert into 表2 select * from 表1 where 表1.姓名 = dlookup('[姓名]','表1',['工号] ="' & n  & '"')"

yedaoan

补充一下,要注意空格

酣畅淋漓

表1.工号 的数据类型为integer
按照yedaoan大哥的做法，sql = "insert into 表2 select * from 表1 where 表1.姓名 = dlookup('[姓名]','表1','[工号] ="' & n  & '"')"提示“字符串语法错误”
无论怎样，谢谢楼上两位了！

酣畅淋漓

cuxun大哥真不愧是金牌会员，按您的做法，问题迎刃而解！
多谢了！！！

yangzhesheng

细节显真章