Question

目标：要使用列表框查找帮助主题，然后自动使用代码查找与用户选择相关的相关主题评论。基本上文本框需要重新查询哪些属性来设置所选记录？也许这会排除相关记录，因此如果ID读取2，则会显示记录2中注释框中的字段。

这是伪代码：

Private Sub List35_AfterUpdate()
Dim myTopic As String
myTopic = "Select * from FormsHelpTable where ([ID] = " & Me.List35 & ")"
Me.Comment.{property to find record/related text} = myTopic
Me.Comment.Requery
End Sub

Answer 1

这有效：

Private Sub List35_AfterUpdate()
Dim myTopic As String
myTopic = "Select * from FormsHelpTable where ([ID] = " & Me.List35 & ")"
Me.Form.RecordSource = myTopic
Me.Comment.Requery
End Sub

不要尝试重新查询或更新单个文本框对象，只需将当前表单RecordSource更新为选择。

使用列表框修改注释的文本框控件

1 个答案: