将标签放在Ms-Access中的组合框上

Question

背景：

我正在尝试在Ms-Access中放置一个标签，用作组合框上的按钮。用户将从组合框列表中进行选择，如果他们想要删除他们的选择，他们可以单击标签以清除选择。

问题：

是否可以将标签显示在组合上方？看起来标签是在组合后面发送的，即使我专门将它发送到等等......

Answer 1

我不是创建重叠标签来清除选择，而是创建一个实际的按钮。您将在设计模式下将按钮和组合框堆叠在彼此顶部，但在格式属性中将按钮可见性设置为“否”。假设您调用组合框“cmbSelect”和清除按钮“cmdClear”，在选择组合框后使用以下内容显示按钮：

Private Sub cmbSelect_AfterUpdate

Me.cmdClear.Visible = True

End Sub

以下代码将在单击按钮后清除表中的数据：

Private Sub cmdClear_Click()


DoCmd.SetWarnings False


'Deletes record from your table
Dim Delete As String
Delete = "DELETE * FROM [TableName] WHERE (([TableName].KeyField)='" & KeyField & "')"
DoCmd.RunSQL Delete

DoCmd.SetWarnings True

End Sub

您还可以通过在每个字段上运行重新查询而不是使用删除字符串来重新查询表单。然后，您可以为“更新后”按钮构建代码，使按钮再次不可见，并允许您从组合框中选择新条目。有很多可能性，但这应该让你开始。如果您需要更多解释或帮助，请与我们联系。