下面错哪里了
Dim wfc As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim cp As String
cp = wfc.Value
Dim jb As New SQLJoinTableBuilder("查询表1","'" & cp & "'")
jb.Connection 链接名 Name = "Sale"
jb.AddTable("'" & cp & "'","产品ID","产品","产品ID")
jb.AddTable("'" & cp & "'", "客户ID","客户","客户ID")
jb.AddExp("产品","产品名称")
jb.AddCols("日期", "数量","单价")
jb.AddExp("金额","数量 * 单价")
jb.Filter="{客户}.客户ID='C01'"
jb.Build()
MainTable = Tables("查询表1")
先谢谢....
[此贴子已经被作者于2016/4/16 2:18:35编辑过]