Select Case e.Sender.Name Case "新增" If e.Form.Controls("Table1").Visible Then Form("窗口1").open ElseIf e.Form.Controls("Table2").Visible Then Form("窗口2").open ElseIf e.Form.Controls("Table3").Visible Then Form("窗口3").open End If CurrentTable.AddNew()
End select
未声明名称Form
我想点新增时,判断显示的表,打开不同的编辑窗口,如何实现