Foxtable(狐表) → 用户栏目 → 专家坐堂 → 连续两天没值累积计算


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

主题：连续两天没值累积计算
美女呀，离线，留言给我吧！
nuoyan89
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		连续两天没值累积计算  发帖心情 Post By：2023/7/31 12:57:00 [显示全部帖子]

老师，我把在临时表中统计连续两天没值累积的停机天数，如图1，请帮忙看看，谢谢
ZK-A-01这台设备的连续停机天数：
     连续停机天数：18天（标注紫色的部分，连续两天没有值的累计相加，低于2天（如黄色部分单元格）或者有值不予计算（如绿色部分单元格）。
ZK-A-11这台设备的连续停机天数：
     连续停机天数：15天（标注紫色的部分，连续两天没有值的累计相加，低于2天（如黄色部分单元格）或者有值不予计算（如绿色部分单元格）。
ZK-A-12这台设备的连续停机天数：
     连续停机天数：7天（标注紫色的部分，连续两天没有值的累计相加，低于2天（如黄色部分单元格）或者有值不予计算（如绿色部分单元格）。

图片点击可在新窗口打开查看此主题相关图片如下：1.jpg
图片点击可在新窗口打开查看
 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 14:47:00 [显示全部帖子]

老师，我累积的天数能填写到临时表的最小量里面吗？连续两天的空白值累积相加，小于2天的不予累积

图片点击可在新窗口打开查看此主题相关图片如下：1.jpg
图片点击可在新窗口打开查看
 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 15:21:00 [显示全部帖子]

怎么调整呢？有帮忙可以参考吗？

 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 16:45:00 [显示全部帖子]

老师，我这个每日日期是变动的，帮助里的有点看不明白，怎么能和实际的连贯起来呢

 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 17:05:00 [显示全部帖子]

老师，要达到3楼的功能还是无从下手，能帮忙看看吗？2楼的代码只统计的最大的连续停机天数
[此贴子已经被作者于2023/7/31 17:06:00编辑过]
 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 17:22:00 [显示全部帖子]

老师，写进去了结果不对
Dim max As Integer = 0
Dim n As Integer = 0
Dim s1 As String = e.form.controls("月份1").Text
Dim d3 As Date = CDate(s1.Insert(4, "-") & "-01")
Dim d4 As Date = New Date(d3.Year, d3.Month, Date.DaysInMonth(d3.Year, d3.Month))
For Each r As DataRow In DataTables("使用监控台_现存量").DataRows
    For i As Integer = 1 To 31
        If r.isnull(format(d3, "yyyy-MM-dd")) Then
            n = n + 1
            If n > max Then max = n
        Else
            n = 0
            r("最小量") = n
        End If
    Next
    r("最小量") = max
Next

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

[此贴子已经被作者于2023/7/31 18:41:00编辑过]
 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 20:57:00 [显示全部帖子]

老师，最小量的值为当月连续2天或者2天以上为空的天数相加，为空没有连续2天，则忽略不计，如图1，具体如下：1、这个机床1月-4日和18日、19日、21日、22日、24日-31日，连续2天及以上都为空，所以最小量为：4+2+2+8=16天（绿色+紫色单元格)；
2、中间7日、9日、14日、16日都有空白，但是每次只有1天，没有满足2天或者2天以上的条件（蓝色部分），因此不用累积到最小量中

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


[此贴子已经被作者于2023/7/31 20:59:03编辑过]
 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 21:30:00 [显示全部帖子]

第2行没有9，是7月9日这一天，没有加7月这两字
1、这个机床1月-4日和18日、19日、21日、22日、24日-31日，连续2天及以上都为空，所以最小量为：4+2+2+8=16天（绿色+紫色单元格)；
2、中间7日、9日、14日、16日都有空白，但是每次只有1天，没有满足2天或者2天以上的条件（蓝色部分），因此不用累积到最小量中
[此贴子已经被作者于2023/7/31 21:31:08编辑过]
 回到顶部
美女呀，离线，留言给我吧！
nuoyan89
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：524 积分：3642 威望：0 精华：0 注册：2020/10/9 8:45:00 		  发帖心情 Post By：2023/7/31 22:26:00 [显示全部帖子]

老师，请以13楼的，之前是把后面看漏了，不好意思，谢谢

 回到顶部
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 次数据查询