呵呵,e参数没有,就直接用窗口名,设置Table的DoubleClick事件:
If Forms("窗口1").Opened Then
Forms("窗口1").Controls("TextBox1").Value = 你要设置的值
Forms("窗口1").Controls("Button1").Performlick()
End If