以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [原创]SELECT字段量引用问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85045)

--  作者:tjnhjs
--  发布时间:2016/5/16 15:03:00
--  [原创]SELECT字段量引用问题
Dim tbl As WinForm.Table
tbl = e.Form.CreateSQLTable("Table1", "Select [_Identify],编号,姓名,\' " & nj &  " \' ,\'" & bj & "\' F rom {学生管理} WHERE 班级=\'" & bj & " \' and 年级=\'" & nj & " \'and 学校=\'" & xx & " \'","")
tbl.SetBounds(58, 130, 720, 420)
e.Form.AddControl(tbl)
运行后列名显示expr1003 

--  作者:大红袍
--  发布时间:2016/5/16 15:11:00
--  

tbl = e.Form.CreateSQLTable("Table1", "Select [_Identify],编号,姓名,\' " & nj &  " \'  as 年级,\'" & bj & "\' as 班级 F rom {学生管理} WHERE 班级=\'" & bj & " \' and 年级=\'" & nj & " \'and 学校=\'" & xx & " \'","")


--  作者:tjnhjs
--  发布时间:2016/5/16 15:20:00
--  
如果是复表头怎么写 比如 考试_语文 变量分别是 ks 和yw 
--  作者:大红袍
--  发布时间:2016/5/16 15:22:00
--  
tbl = e.Form.CreateSQLTable("Table1", "Select [_Identify],编号,姓名,\' " & nj &  " \'  as " & ks & "_" & yw & ",\'" & bj & "\' as 班级 F rom {学生管理} WHERE 班级=\'" & bj & " \' and 年级=\'" & nj & " \'and 学校=\'" & xx & " \'","")
--  作者:tjnhjs
--  发布时间:2016/5/16 15:58:00
--  
谢谢