主题：关于自定义录入窗口之一 在窗体中的使用

参考代码

Dim tbl As Table = Tables("下拉品牌_Table1")
If tbl.Current IsNot Nothing Then
    Tables("tbl_商品").Current("品牌名称") = tbl.Current("品牌名称")
    Tables("tbl_商品").Current("品牌名称") = tbl.Current("品牌名称")
    Tables("tbl_商品").Current("品牌名称") = tbl.Current("品牌名称")
End If
Forms("下拉品牌").Close()