在access 2007 中怎样实现按一个按钮弹出一个输入对话框，按确定就可以修改表中指定记录一个字段

Question

就像在qq里修改备注那样

Answer 1

对于一般的用户来说，下面的语句完全够用了！只是弹出的对话框没有qq的这个绚丽。。
如果，我是说如果，你一定想要这么漂亮的界面：
那你需要做一个窗体，点按钮后弹出这个窗体；等点击确定按钮后，先隐藏这个窗体（以便获取你输入的内容），更新数据后再关闭这个窗体。。
呵呵，这个漂亮的代码我无法教你写了。还是酬和着用下面这个吧~~

把下面的代码复制到你说的按钮单击事件当中，即可实现单击按钮后弹出一个输入对话框，按确定就可以修改表中指定记录一个字段。。

'设定变量str等于弹出框的输入值
Dim str As String
str = InputBox("请输入备注姓名:", "添加备注姓名")
'如果变量str不是空字符串,则更新员工表姓名字段中张三对应的曾用名字段为变量str的值
'假如姓名张三来自窗体控件(以Text1为例),那么下面的条件应改为 WHERE 姓名='" & Text1 & "'"
If str <> "" Then
CurrentDb.Execute "UPDATE 员工表 SET 曾用名 ='" & str & "' WHERE 姓名='张三'"
End If