主题：[求助] 窗口中的表条件加载

老师，我想订单明细窗口中的表条件加载，加载订单明细窗口中的订单编号的行，以下怎么更改，谢谢！

Dim cmb As WinForm.ComboBox = e.form.Controls("ComboBox1")
cmb.ComboList = DataTables("订单").GetComboListString("订单编号")

Dim xuhao As WinForm.ComboBox = e.Form.Controls("ComboBox1")
If Tables("订单").Current IsNot Nothing Then
    xuhao.Text = Tables("订单").Current("订单编号")
End If
Dim A As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim B As String

Tables("订单明细_Table1").Filter = "订单编号 = '& A &'"