主题：能否让一个按钮可以适用于一个窗体的不同Table？

CurrentTable.AddNew

mark 窗口焦点控件

afterLoad事件

vars("当前控件") = new object
e.form.TimerInterval = 500
e.form.TimerEnabled = true

timertick事件

Dim c = e.form.ActiveControl
If c IsNot Nothing Then
    Dim cs() As String = {"RecordGrid1", "RecordGrid2", "Table1"}
    If array.indexof(cs,  c.name) Then
        vars("当前控件") = c
    End If
End If

按钮代码

If typeof vars("当前控件") is winform.control Then
    msgbox(vars("当前控件").name)
End If