Foxtable(狐表)用户栏目专家坐堂 → 时段统计问题


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

主题:时段统计问题

帅哥,在线噢!
有点蓝
  31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/3 16:38:00 [显示全部帖子]

    Dim drs As List(Of DataRow) = DataTables("缴费情况").SQLSelect("[缴费_月租_起计日期] >= #" & e.Form.Controls("StartDate").Value & "# And [缴费_月租_止计日期] <= #" & e.Form.Controls("EndDate").Value & "# And ([车牌号码] = '" & e.Form.Controls("DropBox1").text & "' Or [车牌号码] Is null)")
msgbox(drs.Count)
    If drs.Count > 0 Then

……
    With Tables("安费用所属期查询统计_Table1")
        For i As Integer = .Rows.count - 1 To 0 Step -1
            .Rows(i).Delete
        Next
        LockBaseMainForm() '锁定主界面
        .StopRedraw()
msgbox(dt.datarows.count)
        Dim b As New GroupTableBuilder("统计表1",dt)
        b.Groups.AddDef("分类")
        b.Groups.AddDef("住址_巷")
        b.Groups.AddDef("住址_号")
        b.Groups.AddDef("住址_房")
        b.Groups.AddDef("姓名")
        b.Groups.AddDef("手机号码")
        b.Groups.AddDef("车牌号码")
        b.Totals.AddDef("查询_月租_所属日期",AggregateEnum.Count,"查询_月租_缴费月数")
        b.Totals.AddDef("查询_月租_缴费金额")
        b.Subtotal = True
        .DataSource = b.BuildDataSource()
msgbox(.rows.count)

 回到顶部
帅哥,在线噢!
有点蓝
  32楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/3 16:56:00 [显示全部帖子]

是不是数据没有保存?这里查询车牌号码为空的数据有什么意义

 回到顶部
帅哥,在线噢!
有点蓝
  33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/3 17:18:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  34楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/4 8:47:00 [显示全部帖子]

这个要问自己了,代码里有补足15行的用法

 回到顶部
帅哥,在线噢!
有点蓝
  35楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/4 11:54:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  36楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/4 14:23:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  37楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/4 16:30:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  38楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/4 17:14:00 [显示全部帖子]

能够正常生成dt1.Show("统计表2")吗,打开表结构看看统计表2的表结构

 回到顶部
帅哥,在线噢!
有点蓝
  39楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/5 23:12:00 [显示全部帖子]

                    bc3.Groups.AddDef("缴费_临时停放_起计时间",DateGroupEnum.Year,"年")
                    bc3.Groups.AddDef("缴费_临时停放_起计时间",DateGroupEnum.Month,"月")
                    bc3.Groups.AddDef("车牌号码")
                    bc3.Groups.AddDef("缴费_临时停放_起计时间",DateGroupEnum.none)
                    bc3.Groups.AddDef("缴费_临时停放_止计时间",DateGroupEnum.none)

 回到顶部
帅哥,在线噢!
有点蓝
  40楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/8 15:45:00 [显示全部帖子]

如果是红色代码的问题,就是控件没有下拉选项

 回到顶部
总数 46 上一页 1 2 3 4 5 下一页