Foxtable(狐表)用户栏目专家坐堂 → 请教这种交叉组合统计该怎么做


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

主题:请教这种交叉组合统计该怎么做

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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
请教这种交叉组合统计该怎么做  发帖心情 Post By:2013/5/15 12:56:00 [显示全部帖子]

建了入库和出库2个表,分别的字段是:日期、出/入库单号、出/入库数量

想将2个表的数据按日期的顺序组合起来,显示哪天出了多少,入了多少,当天结余多少

想了一晚上,不会写代码,请高手相助

 


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

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看


 


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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/15 12:57:00 [显示全部帖子]

这是文件

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:交叉统计.table


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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/15 15:37:00 [显示全部帖子]

以下是引用ybil在2013-5-15 15:06:00的发言:
Dim dt1,dt2 As fxDataSource
....
 
t1.ResumeRedraw

还真有神人相助

膜拜!!


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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/15 16:56:00 [显示全部帖子]

Dim dt1,dt2 As fxDataSource
Dim dts As fxDataSource() ={dt1,dt2}
Dim v1 As String() = {"入库","出库"}
Dim jb As SQLJoinTableBuilder
Dim s1,s2 As String
Dim n1 As Integer

For Each s1 In v1
jb =new SQLJoinTableBuilder("查询",s1 & "表")
jb.AddExp("日期", s1 & "日期")
jb.AddExp(s1 & "单号", s1 & "单号")
jb.AddExp(s1 & "数量", "数量")
-------------------------------------------------
红色部分怎么理解?
为何不直接写“出库表”,“入库表”
而是写“出库”“入库”,然后下面跟个“表”呢?

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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/16 9:53:00 [显示全部帖子]

昨晚照着代码做了一遍

这个代码有个地方要注意,在统计前,需将2个来源表保存,才能有正确的数据被统计出来


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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/19 15:45:00 [显示全部帖子]

刚把内部数据源重定向到外部ACCESS数据库,发现该代码不管用了

能教教当是外部数据源时,怎么写代码不?


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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/19 15:46:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/19 19:48:00 [显示全部帖子]

以下是引用don在2013-5-19 17:10:00的发言:
昏,加上數據源啊:


jb
.Connection Name = "Sale"

这句是关键,connection和name之间没有空格就对了

多谢嗮don


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


加好友 发短信
等级:小狐 帖子:316 积分:2628 威望:0 精华:0 注册:2013/3/4 20:21:00
  发帖心情 Post By:2013/5/21 22:02:00 [显示全部帖子]

这个代码不适合表里有表达式字段的统计,否则会报错

 回到顶部