【发布时间】:2017-05-17 02:18:38
【问题描述】:
我正在访问中创建一个数据库。我有一个带有组合框的表格,其中有 37 个项目可供选择。当用户填写表格时,数据会很好地进入表格,但不会显示组合框中的项目,而是显示 id 号,而不是来自 Combo 的选项。此组合从具有两列的表中提取其数据。一是访问权限使您输入的ID,二是清洁类型,这是组合中的选择。我想知道是否有一种方法可以在 VBA 中创建某种 if/then 语句,或者是否有一个函数可以完全按原样显示列中的信息,而不是与其关联的 ID 号。这是附加到保存数据按钮的代码:
Private Sub Command33_Click()
Dim strSQL As String
Dim strName As String
Dim varItem As Variant
DoCmd.SetWarnings False
strSQL = "INSERT INTO CleaningLog(Name1, Date1, Shift, Cleaning, Comments) VALUES ('" & Me!Text12 & "', '" & Me!Text15 & "', '" & Me!Combo25 & "', '" & Me!Combo19 & "', '" & Me!Text30 & "');"
DoCmd.RunSQL (strSQL)
DoCmd.SetWarnings True
Me.Refresh
End Sub
所有数据都可以正常插入,除了 Combo19 中的清理。这是唯一从表中提取数据的方法。谢谢!
【问题讨论】: