- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 窗口表名称问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119860)
-- 发布时间：2018/6/2 11:47:00
-- [求助] 窗口表名称问题
之前用
Dim q As new QueryBuilder q.TableName = sd1.month & "月工资表" 用这个办法可以生成一个工资表的临时表，表明为 月份+工资表
但是现在想用fill方法，把这个临时表加到窗口中，也希望他用这个 sd1.month & "月工资表" 方法作为表名。不知道如何处理。现在的代码是:
Tables("财务工具_Table1").Fill("se le ct ...........,True)
With DataTables("财务工具_Table1")
.DataCols.Add("个税", Gettype(Integer), " IIF(工资 > 3500,IIF( 工资 > 5000,IIF(工资 > 7000, 245 ,( 工资 - 3500) * 0.1 - 105) ,( 工资 - 3500 ) * 0.03 ),0) " )
.DataCols.Add("税后",Gettype(Integer), "工资 - 个税 ")
.DataCols.Add("农行",Gettype(Integer), " IIF(税后 >= 7000 , 6955 , 税后) " )
.DataCols.Add("待遇总额",Gettype(Integer), "税后 - 公司缴纳社保 - 个人缴纳社保" )
End With
Tables("财务工具_Table1").AutoSizeCols()
Tables("财务工具_Table1").AllowEdit=True
For Each dc As Col In Tables("财务工具_Table1").cols
With Tables("财务工具_Table1")
dc.GrandTotal = True \'指定要合计的列
.GrandTotal = True \'显示合计模式
End With
Next
这样的话就不知如何把表名称改成之前那样。
[此贴子已经被作者于2018/6/2 11:47:37编辑过]
-- 发布时间：2018/6/2 11:51:00
--
窗口表的名称是固定的，无法更改，只能改标题。为什么要改名称，目的是什么？
-- 发布时间：2018/6/2 12:44:00
--
此主题相关图片如下：2.png
这里面有这些功能，每个功能都是用fill方法生成一个表放到下面，然后用导出按钮，导出表格，如果生成的表没法取名的话，导出的时候能不能自动根据情况命名呢，导出的代码是系统的命令Syscmd.Project.ExportToExcel()
此主题相关图片如下：1.png
-- 发布时间：2018/6/2 13:55:00
--
用这个：http://www.foxtable.com/webhelp/scr/0559.htm
-- 发布时间：2018/6/3 12:43:00
--
多谢了
[此贴子已经被作者于2018/6/3 12:43:46编辑过]
-- 发布时间：2018/6/21 18:06:00
--
通过表名传递参数。表有标题么？
-- 发布时间：2018/6/21 18:18:00
--
以下是引用furan在2018/6/21 18:06:00的发言：
通过表名传递参数。表有标题么？
通过表名传递参数。表有标题么？
表没有标题。