窗体数据更新问题

FSG

一个窗体带两个子窗体,在一个子窗体中修改某一项数据,另一项数随之更改(注:两个子窗体之间有数据关系)请参见附件,进入工资核算窗体,进行考评子窗体进行数据修改,要求右手边的子窗体数据随之更新.

均瑶

同样的问题，顶一下，求助！

均瑶

如要按输入工号更新姓名，我按下面的程序执行，但是报错，请问是什么原因

Private Sub 工号_AfterUpdate()
    ' 查找与该控件匹配的记录。
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    If Not IsNull(Me![工号]) Then
    rs.FindFirst "Table!emplyee.[姓名] = " & Str(Me![工号])
    Me.Bookmark = rs.Bookmark
    Else
    MsgBox "请输入工号！", 48, "警告"
    End If
    Me.姓名.Visible = False
   

End Sub