表三的【学生姓名】和【课程名称】设为查阅字段,行来源分别为【表一】和【表二】,窗体1(绑定到表三)的【学生姓名】和【课程名称】控件为组合框,写他们的“不在列表中”事件:
Private Sub 学生姓名_NotInList(NewData As String, Response As Integer)
...'更新学生信息
ned sub
Private Sub 课程名称_NotInList(NewData As String, Response As Integer)
...'更新课程信息
ned sub