主题：[求助]自动录入

窗口1DropDownClosed事件这么改，如：

If e.Selected Then '如果选择了值
    Dim tbl As Table = Tables("窗口1_Table1")
    If tbl.Current IsNot Nothing Then
        e.Form.DropDownBox.Value = tbl.Current("客户ID")
        Tables("订单").Current("地址") = tbl.Current("地址")
    End If
End If