Ms access 连续形式组合框上的文本框
我希望有人能帮上忙。我在Access 2013中有一个连续表单,我已经有代码,允许您搜索特定项目,这是一个按钮的点击事件,我还有一个重置,另一个按钮的点击事件。 通过在组合框的行源中使用查询,我成功地创建了一个组合框,该组合框限制了表单中字段可以选择的内容。(感谢马特·希尔) 还有一个当前事件作为组合框重新查询运行 我还设法在组合框上放置了一个文本框来隐藏它们,但是我无法让文本框显示组合框的内容,然后在我移动到下一个组合框并选择另一项时保留该数据,当前发生的情况是,组合框不断变化,当选择时,所有组合框都显示相同的对象,当我移动到下一个组合框时,它会清除所有组合框中的数据,并显示新的选择 这让我抓狂,所以任何帮助都将不胜感激 您好,所有更新,请参阅下面的VBA了解正在运行的内容:Ms access 连续形式组合框上的文本框,ms-access,combobox,vba,ms-access-2013,Ms Access,Combobox,Vba,Ms Access 2013,我希望有人能帮上忙。我在Access 2013中有一个连续表单,我已经有代码,允许您搜索特定项目,这是一个按钮的点击事件,我还有一个重置,另一个按钮的点击事件。 通过在组合框的行源中使用查询,我成功地创建了一个组合框,该组合框限制了表单中字段可以选择的内容。(感谢马特·希尔) 还有一个当前事件作为组合框重新查询运行 我还设法在组合框上放置了一个文本框来隐藏它们,但是我无法让文本框显示组合框的内容,然后在我移动到下一个组合框并选择另一项时保留该数据,当前发生的情况是,组合框不断变化,当选择时,所有
Private Sub Command26_Click()
Dim strsearch As String
Dim Task As String
'Check if a keyword entered or not
If IsNull(Me.txtsearch) Or Me.txtsearch = "" Then
MsgBox "Please type in your search keyword.", vbOKOnly, "Keyword Needed"
Me.txtsearch.BackColor = vbYellow
Me.txtsearch.SetFocus
Else
strsearch = Me.txtsearch.Value
Task = "SELECT * FROM Base_Data WHERE ((PARENT_FSC Like ""*" & strsearch & "*""))"
Me.RecordSource = Task
Me.txtsearch.BackColor = vbWhite
End If
End Sub
Private Sub Command27_Click()
Dim strsearch As String
strsearch = "SELECT * from Base_Data"
Me.RecordSource = strsearch
End Sub
Private Sub Form_Current()
Me.cboComponent.Requery
End Sub
除了运行这段代码之外,我还在表单属性的记录源中有一个SQL查询
再说一次,任何帮助都会很好 连续窗体上的未绑定控件充当一个控件-因为它们没有控件源。i、 e.目标表中的记录/字段,这些记录/字段已绑定。您必须向我们提供更多信息以帮助您。组合框是否以某种方式链接(通过名称、组或其他方式)?表单上是否有任何VBA代码在输入任何控制框时自动更改任何内容?如果到目前为止有任何VBA代码,请将其包含在您的问题中。屏幕截图也会有所帮助。听起来有点像在连续表单的详细信息部分有一个未绑定的组合框-这将始终在所有行中显示相同的数据。大家好,谢谢回复。很抱歉反应太晚,我不得不去做另一项重要的任务,这项任务已经占据了优先权。回过头来看,我将尝试获取一些查询和代码的屏幕截图。@Ralph请参阅附件,抱歉时间差。回到这里,非常感谢您的帮助。Cheers@Andre嗨,我只是想说更多的细节,抱歉耽搁了这么久。任何帮助都会很好。干杯