Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共18 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:[求助]根据模板生成excel表时,费用日期一栏,如何生成?

1楼
hrw68529 发表于:2024/5/28 10:28:00
根据模板生成excel表时,在“费用日期”一栏,根据下边的表年度和月份,生成:如:2024年1月-3月,如何设计模板,请专家指导。
如下图:
图片点击可在新窗口打开查看此主题相关图片如下:截图00.jpg
图片点击可在新窗口打开查看
2楼
有点蓝 发表于:2024/5/28 10:35:00
方法1、http://www.foxtable.com/webhelp/topics/1391.htm
2、http://www.foxtable.com/webhelp/topics/1145.htm,生成报表是使用代码设置,如

Sheet(6,6).Value = "制单人:" & User.Name '修改模板,加入制单人信息
3楼
hrw68529 发表于:2024/5/28 11:00:00
<"起始日期:" & [!起始日期]>,怎么用,请有点蓝老师指导!
4楼
有点蓝 发表于:2024/5/28 11:05:00
比如有一个vars变量"月份范围",生成报表前给变量赋值
vars("月份范围") = "2024年1月-3月"


模板里的单元格填入
[!月份范围]
5楼
hrw68529 发表于:2024/5/28 11:11:00
有点蓝老师,不能根据表的生成的年、月吗,假如,我选择的2024年1月和2月的数据,费用日期应该显示为:2024年1月-2月,如果我选择的2024年2月、3月、4月的数据,费用日期应该显示为:2024年2月-4月,怎么实现,谢谢老师,请指导
6楼
有点蓝 发表于:2024/5/28 11:16:00
遍历选择的行,把月份合并给var变量赋值
7楼
hrw68529 发表于:2024/5/28 16:06:00
有点蓝老师,我试着写了一段代码,但生不成,请指导
代码如下:
 Dim zgf, zdf As Integer
    Dim dt As DataTable = DataTables("医疗救助")
    For Each dr As DataRow In dt.DataRows
        Dim drs As List(Of DataRow) = DataTables("医疗救助").Select("", "月份")
        zgf = drs(drs.Count-1)("月份")
        zdf = drs(0)("月份")
       vars("月份范围") = zgf & "-" & zdf &"月"
Next

8楼
有点蓝 发表于:2024/5/28 16:16:00
Dim zgf, zdf As Integer
    Dim dt As DataTable = DataTables("医疗救助")
        Dim drs As List(Of DataRow) = DataTables("医疗救助").Select("", "月份")
        zgf = drs(drs.Count-1)("月份")
        zdf = drs(0)("月份")
       vars("月份范围") = zgf & "-" & zdf &"月"
msgbox(vars("月份范围") ) ‘’看看是什么结果
9楼
hrw68529 发表于:2024/5/28 16:32:00
这段代码放在哪个属性里边?
显示结果为:

图片点击可在新窗口打开查看此主题相关图片如下:截图01.jpg
图片点击可在新窗口打开查看

10楼
有点蓝 发表于:2024/5/28 16:36:00
提示显示代码没有问题。代码放到一个按钮里,生成报表前先点一下按钮。
共18 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.