- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于报表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=148715)
-- 发布时间：2020/4/14 9:29:00
-- 关于报表
有一张报表，需要动态绑定字段，比如某一窗体字段有（收支类型、所属账户、记账日期、经手人四个字段）根据报表类型不同需要在报表的某一字段动态绑定，怎么设置一下呢？
此主题相关图片如下：截图09.jpg
-- 发布时间：2020/4/14 10:14:00
--
类似这种：http://www.foxtable.com/webhelp/topics/2626.htm，动态更改模板单元格的内容再输出报表
-- 发布时间：2020/4/14 19:29:00
--
此主题相关图片如下：截图00.jpg
ElseIf flxs.Checked Then
mbwjwz = ProjectPath & "Attachments\\支出分类报表.xls"
bbwjwz = ProjectPath & "Reports\\支出分类报表.pdf"
Dim Book1 As New XLS.Book(mbwjwz)
Dim fl1 As String = bbwjwz
If Tables("支出明细窗体_zcTable").Current IsNot Nothing AndAlso Forms("支出明细窗体").Opened
Dim Sheet1 As XLS.Sheet = Book1.Sheets(0)
Sheet1(1,4).Value = "记账日期:" & bbrq
If aszlx.Checked Then
Sheet1(2,2).Value = "支出类型"
Sheet1(2,3).Value = "[收支类型]"
ElseIf asszh.Checked
Sheet1(2,2).Value = "所属账户"
Sheet1(2,3).Value = "[所属账户]"
ElseIf ajzrq.Checked
Sheet1(2,2).Value = "记账日期"
Sheet1(2,3).Value = "[记账日期]"
ElseIf ajsr.Checked
Sheet1(2,2).Value = "经手人"
Sheet1(2,3).Value = "[经手人]"
End If
Book1.Build() \'生成细节区
Book1.SaveToPDF(fl1) \'\'保存为PDF文件
Dim Proc1 As New Process \'打开PDF文件
Proc1.File = fl1
Proc1.Start()
End If
红色的代码哪有问题为什么只能统计 "支出类型" 其他的都是空值呢？
[此贴子已经被作者于2020/4/14 19:31:21编辑过]
-- 发布时间：2020/4/14 21:05:00
--
第一个勾选了，其它的当然就不会输出了
-- 发布时间：2020/4/14 21:13:00
--
取消了也是不显示，结果一样
此主题相关图片如下：截图01.jpg
[此贴子已经被作者于2020/4/14 21:15:02编辑过]
-- 发布时间：2020/4/14 21:19:00
--
上传实例
-- 发布时间：2020/4/14 21:25:00
--
这是个综合实例无法上传
If aszlx.Checked Then
Sheet1(2,2).Value = "支出类型"
Sheet1(2,3).Value = "[收支类型]"
ElseIf asszh.Checked
Sheet1(2,2).Value = "所属账户"
Sheet1(2,3).Value = "[所属账户]"
ElseIf ajzrq.Checked
Sheet1(2,2).Value = "记账日期"
Sheet1(2,3).Value = "[记账日期]"
ElseIf ajsr.Checked
Sheet1(2,2).Value = "经手人"
Sheet1(2,3).Value = "[经手人]"
End If
这段代码有问题吗？
[此贴子已经被作者于2020/4/14 21:25:40编辑过]
-- 发布时间：2020/4/14 21:36:00
--
不是筛选条件，是改变字段名称的
-- 发布时间：2020/4/14 21:51:00
--
没看出来有什么问题
-- 发布时间：2020/4/14 22:01:00
--
你为什么只能显示[收支类型]，变为其他字段都不显示了呢？上面是全部代码
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:支出分类报表.xls |
这是窗体
此主题相关图片如下：截图04.jpg
[此贴子已经被作者于2020/4/14 22:07:53编辑过]