Foxtable(狐表)用户栏目专家坐堂 → 取数


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

主题:取数

帅哥哟,离线,有人找我吗?
qazlinle6
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
取数  发帖心情 Post By:2020/12/31 19:03:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:批注 2020-12-31 190024.png
图片点击可在新窗口打开查看


输入年,月,店名,对账品名,月初柜台余货_数量  取上个月的  月末柜台余货_数量  数

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/12/31 20:36:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:批注 2020-12-31 203508.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/12/31 21:06:00 [显示全部帖子]

如果把年月改成日期呢  什么改代码

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/12/31 21:26:00 [显示全部帖子]

日期我也想像年月那样2020-02=2020-01
2020-01-02=2020-01-01 戓  2020-01-10=2020-01-01   取当时加的日期前面那个
[此贴子已经被作者于2020/12/31 21:29:44编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/12/31 22:17:00 [显示全部帖子]

这个我用了,太卡了

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2020/12/31 23:16:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:批注 2020-12-31 231528.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2021/1/1 0:25:00 [显示全部帖子]

Select Case e.DataCol.Name
    Case "年","月","店名汉字","对账品名"
        Dim dr As DataRow = e.DataRow
        Dim pr As DataRow
        If dr.IsNull("年") OrElse dr.IsNull("月") OrElse dr.IsNull("店名汉字") OrElse dr.IsNull("对账品名") Then
            dr("月初柜台余货数量") = Nothing
        Else
            Dim filter As String
            filter = "店名汉字 = '" & dr("店名汉字") & "' And 对账品名 = '" & dr("对账品名") & "'"
            Dim d As Date = new Date (dr("年"),dr("月"),1)
            d = d.AddMonths(-1)
            filter = filter & " and 年=" & d.Year & " And 月=" & d.Month
            pr = DataTables("统计汇总表").SQLFind(filter)      SQL改内容重置为什么只更新一行,保   了才可以又更新一行   
            If pr IsNot Nothing Then
                dr("月初柜台余货数量") = pr("月末柜台余货数量")
            End If
        End If
End Select

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2021/1/3 18:00:00 [显示全部帖子]

IsNull(month({进货退货}.日期),month({销售明细}.日期))   2020年1月  什么改让显示01而不是1




 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2021/1/3 20:21:00 [显示全部帖子]

查询表

 回到顶部
帅哥哟,离线,有人找我吗?
qazlinle6
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1503 积分:10158 威望:0 精华:0 注册:2013/6/8 16:19:00
  发帖心情 Post By:2021/1/3 20:45:00 [显示全部帖子]

不行还是1不是01

 回到顶部
总数 14 1 2 下一页