Foxtable(狐表)用户栏目专家坐堂 → CheckedComboBox控件问题


  共有2590人关注过本帖平板打印复制链接

主题:CheckedComboBox控件问题

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


加好友 发短信
等级:婴狐 帖子:38 积分:352 威望:0 精华:0 注册:2019/3/27 20:17:00
CheckedComboBox控件问题  发帖心情 Post By:2019/4/28 10:18:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190428101053.png
图片点击可在新窗口打开查看
请问我在利用ComboBox和CheckedComboBox实现了在ComboBox中选择内容后,在CheckedComboBox中只能选择相关联的内容,但是当在CheckedComboBox中选择一条内容时,可以生成统计表,如下图所示。

但是在CheckedComboBox中选择两条内容以上时就无法再生成统计表了。如图所示:


以下是我在按钮中的代码。
Dim b As New GroupTableBuilder("供电所线路统计",DataTables("缺陷隐患库原始数据表"))
b.Groups.AddDef("所属10千伏线路") '根据所属10千伏线路分组
b.Totals.AddDef("缺陷数量") '对数量进行统计
b.Build '生成统计表
MainTable = Tables("供电所线路统计") '打开生成的统计表

Dim Filter As String
With e.Form.Controls("CheckedComboBox供电所线路统计")
    If .Value IsNot Nothing Then
        Filter = "所属10千伏线路  = '" & .Value & "'"
    End If
End With
If Filter > "" Then
    Tables("供电所线路统计").Filter = Filter
End If


请问是为什么,怎么解决呢?


另外,我想实现在chart中实现对生成的统计表用柱状图表现,该怎么写代码呢?
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190428101031.png
图片点击可在新窗口打开查看

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