主题：[求助]狐爸,麻烦你再给个提示

狐爸,多谢你的帮忙,不过我的项目中下方右边还有一个关联表,这是一个查询表,我用同样的方法未能揍效.不知是什么原因

 

 

If e.Table.name = "会员表.会员见面副表"
    Dim idx As Integer = Tables("会员见面副表").FindRow(e.Row.DataRow)
    Tables("会员见面副表").Position = idx
End If
If  Forms("见面管理").Opened = False Then
    Forms("见面管理").Open
End If

看来我这路走偏了,狐爸的提示是对的,但如果这样的话,我这项目将要进行很大的改动

其实我认为不必改了,这个功能已经能实现,要的只是用户多点几下鼠标而也,倒不是嫌麻烦,只是改了的话,反而会实得其反