主题：自动输入

4、将Table控件的DoubleClick事件设置为：

Dim tbl As Table = Tables("窗口1_Table1")
If tbl.Current IsNot Nothing Then
    e.Form.DropDownBox.Value = tbl.Current("客户ID")
End If
e.Form.DropDownBox.CloseDropDown()

这样在窗口的Table中双击某行，即可将该行的客户ID输入到订单表的当前行中，并关闭下拉窗口。

e.Form.DropDownBox.Value = tbl.Current("客户ID") 这行代码不理解

另见附件照片，双击下拉窗口中行内容输入不到表中，帮忙看看代码，谢谢