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

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 

而不是

试图重新查询或更新各个框对象，只需更新当前窗体记录来选择。