Office中国论坛/Access中国论坛

标题: 请教如何将一个变量的值写入表中？ [打印本页]

作者: SecurID 时间: 2009-3-21 13:52
标题: 请教如何将一个变量的值写入表中？
用X = DLookup("[字段1]", "表1")能将表1的字段1的值赋予变量“X”；
反过来如何写才能将变量“X”的值写入表的字段1中？
如果用更新查询的话，“更新到”中怎么引用变量“X”？

作者: todaynew 时间: 2009-3-21 13:58
docmd.runsql "UPDATE 表1 SET 字段1=" & x

作者: SecurID 时间: 2009-3-21 14:28
好像不行啊，叫输入参数！！

作者: todaynew 时间: 2009-3-21 15:04
本帖最后由 todaynew 于 2009-3-21 15:12 编辑

好像不行啊，叫输入参数！！
SecurID 发表于 2009-3-21 14:28

[attach]36808[/attach]
[attach]36811[/attach]

Private Sub ID_AfterUpdate()
Me.原姓名.Value = DLookup("姓名", "表1", "编号=" & Val(Me.ID))
End Sub

Private Sub 更名_Click()
Dim strsql As String
Dim strname As String
strname = Me.新名字
strsql = "UPDATE 表1 SET 姓名='" & strname & "' WHERE 表1.编号=" & Val(Me.ID)
DoCmd.SetWarnings False
DoCmd.RunSQL strsql
Me.Child2.Form.Requery
End Sub

作者: SecurID 时间: 2009-3-21 15:54
看来，应该是缺少一对引号才会提示叫输入参数！多谢了

作者: todaynew 时间: 2009-3-21 16:05

看来，应该是缺少一对引号才会提示叫输入参数！多谢了
SecurID 发表于 2009-3-21 15:54

如果是字符型的应该加单引号，数据型的不能加。

作者: SecurID 时间: 2009-3-21 16:07
多谢指点！

作者: chaojianan 时间: 2009-3-21 16:07
谢谢分享，学习了。

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