主题：button按钮根据窗口页面变换执行

老师你好，窗口能调用吗？要怎么调用呢？比如在入库单，出库单中都需要分别选择物料编码，我目前的做法是分别做了两个弹窗

不知道有没有更好的办法呢？其中button按钮事件代码里面都涉及到了具体表，这个表可以替换为当前在哪个窗口上，自动识别为对当前窗口表进行操作吗？

还有所有单据比如（增加、删除，修改等等都一样的情况。。。）

Dim t As Table = Tables("入库单父表.入库单子表")
Dim i As Integer = t.Current.Index
t.rows(i).Delete
For Each r As Row In Tables("商品弹窗_table1").GetCheckedRows
    Dim nr As Row = t.AddNew
    nr("商品编码") = r("商品编码")
    nr("商品名称") = r("商品名称")
    nr("商品分类") = r("商品分类")
    nr("计量单位") = r("计量单位")
Next
Forms("商品弹窗").close()