Foxtable(狐表)用户栏目专家坐堂 → 求帮助,我想把组合框字符串当成表名用


  共有1981人关注过本帖树形打印复制链接

主题:求帮助,我想把组合框字符串当成表名用

帅哥哟,离线,有人找我吗?
limit_1982
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1809 威望:0 精华:0 注册:2015/12/5 19:21:00
求帮助,我想把组合框字符串当成表名用  发帖心情 Post By:2016/4/16 2:10:00 [只看该作者]

下面错哪里了

 

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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/4/16 10:11:00 [只看该作者]

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")

 回到顶部