有个窗口里有几个combobox的控件,想根据这几个控件的输入值来加载生成查询表,
执行不了,请教下,谢谢
Dim c3 As WinForm.ComboBox = e.Form.Controls("ComboBox3")
Dim c4 As WinForm.ComboBox = e.Form.Controls("ComboBox4") '
Dim jb As New SQLJoinTableBuilder("销售查询","table_7")
jb.AddTable("table_7","订单编号","table_6","订单编号")
jb.AddCols("{table_6}.订单编号","销售区域","订单性质","订单日期","客户名称","产品名称及规格","产品单价","产品数量")
jb.Filter = "销售区域 = '"&c4&"' and 销售区域 = '"&c3&""
jb.Build()
MainTable = Tables("销售查询")
[此贴子已经被作者于2011-12-1 0:40:12编辑过]