同一个表两个字段使用下拉窗口后，发现不能实现预期效果，如何修改？
Dim tbl As Table = Tables("内部单位_Table1")
If tbl.Current IsNot Nothing Then
If Tables("T_采购单").Cols.Contains("采购单位") Then
Tables("T_采购单").Current("采购单位") = tbl.Current("内部客户名")
ElseIf Tables("T_采购单").Cols.Contains("合作单位") Then
Tables("T_采购单").Current("合作单位") = tbl.Current("内部客户名")
End If
End If
Forms("内部单位").Close()
If tbl.Current IsNot Nothing Then
Tables("T_采购单").Current(e.form.dropcol.name) = tbl.Current("内部客户名")
End If