主题：查询表代码转化

还可以看看这个：
http://www.foxtable.com/help/topics/1909.htm

例如：
 
Dim jb As New SQLJoinTableBuilder("查询表1","订单")
jb.Connection Name = "Sale"
jb.AddTable("订单","产品ID","产品","产品ID")
jb.AddCols("产品名称", "日期", "数量","单价")
Tables("窗口1_Table1").DataSource = jb.BuildDataSource()

 

如果你想用2楼直接写sql语句的方法，但是自己不会写，可以看看：

http://www.foxtable.com/help/topics/2317.htm

 

例如在命令窗口执行：

 

Dim jb As New SQLJoinTableBuilder("查询表1","订单")
jb.Connection Name = "Sale"
jb.AddTable("订单","产品ID","产品","产品ID")
jb.AddCols("产品名称", "日期", "数量","单价")
output.show(jb.BuildSql)

 

就可以得到你要的SQL语句。

 

也可以可视化得到SQL语句：

http://www.foxtable.com/help/topics/2322.htm

 

一点不伤脑细胞哦，感觉foxtable体贴得有点过份了，得意....

 

 

你要合成的话,类似：

 

dim sql As String = "SQL 语句前半部分 where 合同记录.[登记月份] < '" & e.Form.Controls("日期输入框1的名称").Value & "' SQL 语中间半部分 or A2.[辞退日期] > '" & e.Form.Controls("日期输入框2的名称").Value & "' Sql语句的后半部分"

Tables("窗口1_Table1").Fill(sql,"数据源明黄曾",True)

 

建议看看：

http://www.foxtable.com/help/topics/1284.htm

http://www.foxtable.com/help/topics/1058.htm

 

当然最还是先按顺序系统看两三遍帮助文件，有个整体的了解比好。