Office中国论坛/Access中国论坛

标题: [求助]---参数无法传递！——菜鸟问题 [打印本页]

作者: 酣畅淋漓 时间: 2007-9-17 11:11
标题: [求助]---参数无法传递！——菜鸟问题
菜鸟写了以下代码，可运行后提示要求输入参数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 时间: 2007-9-17 11:20
关键是这句改成这样试试看
sql = "insert into 表2 select * from 表1 where 表1.姓名 = dlookup('[姓名]','表1',['工号] ="' & n & '"')"

作者: yedaoan 时间: 2007-9-17 11:21
补充一下,要注意空格

作者: 酣畅淋漓 时间: 2007-9-17 12:28
标题: 多谢楼上两位，但仍然解决不了！
表1.工号的数据类型为integer
按照yedaoan大哥的做法，sql = "insert into 表2 select * from 表1 where 表1.姓名 = dlookup('[姓名]','表1','[工号] ="' & n & '"')"提示“字符串语法错误”
无论怎样，谢谢楼上两位了！

作者: 酣畅淋漓 时间: 2007-9-17 13:24
标题: 谢谢cuxun大哥！问题解决了！
cuxun大哥真不愧是金牌会员，按您的做法，问题迎刃而解！
多谢了！！！

作者: yangzhesheng 时间: 2009-5-29 15:01
细节显真章

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