Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]根据模板生成excel表时，费用日期一栏，如何生成？


  共有3201人关注过本帖树形打印复制链接

主题：[求助]根据模板生成excel表时，费用日期一栏，如何生成？
帅哥哟，离线，有人找我吗？
hrw68529
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		[求助]根据模板生成excel表时，费用日期一栏，如何生成？  发帖心情 Post By：2024/5/28 10:28:00 [显示全部帖子]

根据模板生成excel表时，在“费用日期”一栏，根据下边的表年度和月份，生成：如：2024年1月－3月，如何设计模板，请专家指导。
如下图：
图片点击可在新窗口打开查看此主题相关图片如下：截图00.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/28 11:00:00 [显示全部帖子]

<"起始日期:" & [!起始日期]>，怎么用，请有点蓝老师指导！

 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/28 11:11:00 [显示全部帖子]

有点蓝老师，不能根据表的生成的年、月吗，假如，我选择的2024年1月和2月的数据，费用日期应该显示为：2024年1月－2月，如果我选择的2024年2月、3月、4月的数据，费用日期应该显示为：2024年2月－4月，怎么实现，谢谢老师，请指导

 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：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
 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/28 16:32:00 [显示全部帖子]

这段代码放在哪个属性里边？
显示结果为：

图片点击可在新窗口打开查看此主题相关图片如下：截图01.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/28 16:39:00 [显示全部帖子]

好的，谢谢

 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/28 17:14:00 [显示全部帖子]

有点蓝老师，生成的是全部表格的汇总，不是我在窗口副表中选择的数据汇总，你帮我看看，代码怎么改？
代码如下：Dim zgf, zdf As Integer
Dim drs As List(Of DataRow) = Tables("医疗救助_明细").DataTable.Select("", "月份")
zgf = drs(drs.Count-1)("月份")
zdf = drs(0)("月份")
vars("月份范围") = zdf & "-" & zgf & "月"
 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/29 8:20:00 [显示全部帖子]

有点蓝老师，上述代码总是实现不了我想要的结果，能不能换个思路，根据目录权复选框所选择的月份，生成“月份范围”，如我在目录树中选中1月、2月，就生成：1－2月，如果我在目录树中选中2月、3月、4月，就生成2－4月，然后传递给vars("月份范围")，怎么写代码，请指导。
如下图：

图片点击可在新窗口打开查看此主题相关图片如下：截图02.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/29 9:15:00 [显示全部帖子]

有点蓝老师，不会弄啊，请指导

 回到顶部
帅哥哟，离线，有人找我吗？
hrw68529
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1148 积分：8964 威望：0 精华：0 注册：2012/7/10 9:09:00 		  发帖心情 Post By：2024/5/29 15:58:00 [显示全部帖子]

谢谢有点蓝老师

 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07031 秒, 5 次数据查询