Foxtable(狐表)用户栏目专家坐堂 → 求按月统计代码


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

主题:求按月统计代码

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19384 威望:0 精华:1 注册:2008/9/12 9:19:00
求按月统计代码  发帖心情 Post By:2010/1/16 15:24:00 [显示全部帖子]

想在表A窗口中按月统计型号的数量,不想用临时表。请帮帮忙。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table

[此贴子已经被作者于2010-1-16 15:25:05编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19384 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2010/1/16 16:31:00 [显示全部帖子]

我想在窗口建立控件对型号进行筛选查询,不知道统计表1怎么引用


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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19384 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2010/1/16 17:01:00 [显示全部帖子]

窗口统计表下拉列表代码“统计表1”怎么表示

Dim Filter As String
With e.Form.Controls("型号")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "型号 = '" & .Value & "'"
    End If
End With

If Filter > "" Then
    Tables("统计表1").Filter = Filter
End If


 回到顶部