访问 - 使用表单按钮设置字段值

Question

我想制作一个＆＃39;色轮＆＃39;在Access中，用户在表单中显示一系列颜色，并选择任何颜色将颜色名称放在表格字段中。

我想通过创建许多按钮来实现这一点，每个按钮都有不同的颜色。因此，当用户点击蓝色按钮（例如）时，标题为“颜色”的字段为＆＃39;在＆＃39;偏好＆＃39;表格设置为＆＃39; Blue＆＃39;。

我已将此按钮的On Click属性设置为=[Colour].[Value]="Blue"，但这不起作用。我非常感谢我在哪里出错以及如何纠正这个问题。

非常感谢提前！

Answer 1

您必须在活动中拥有一些代码 - 例如：

Me![YourTableColourField].Value = "Blue"

Answer 2

On Click是一个事件。因此，它应该看起来像这样：

Dim strSQL as String

strSQL = "UPDATE Preferences SET Colour = XXX"
DoCmd.RunSQL strSQL

将XXX替换为您喜欢的任何数字。如果表有多个条目，那么你将需要一个WHERE语句来指示应该更新哪个记录（这通常通过使用某种类型的ID字段来区分记录）。