Foxtable(狐表)用户栏目专家坐堂 → 如何在窗体中适时显示统计数据


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

主题:如何在窗体中适时显示统计数据

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


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

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


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


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

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



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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 13:42:00 [显示全部帖子]

是基础的语法和概念没有理解,张冠李戴

e.Form.Controls("Label5").text =  r("出资人") & "支出:" & DataTables("表A").Compute("sum(消费金额)","出资人='" & r("出资人") & "'")

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 14:29:00 [显示全部帖子]

代码没有问题,被其它控件挡住了吧

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 14:43:00 [显示全部帖子]

表事件没有改

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 15:31:00 [显示全部帖子]

怎么改的,贴出代码

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 15:50:00 [显示全部帖子]

一样的用法啊,CurrentChanged原来的代码是怎么使用行和"出资人"的值的

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 16:19:00 [显示全部帖子]

Forms("窗口1").Controls("Label5").text = e.Table.Current ("出资人")  & "支出:" &  e.Table.DataTable.Compute("sum(消费金额)","出资人='" & e.Table.Current ("出资人") & "'") 

对比按钮和datacolchanged的用法,逻辑有区别吗?只是不同地方取当前行的方式不一样而已。

按钮
e.Form.Controls("Label5").text =  r("出资人") & "支出:" & DataTables("表A").Compute("sum(消费金额)","出资人='" & r("出资人") & "'")

datacolchanged
Forms("窗口1").Controls("Label5").text = e.DataRow("出资人") & "支出:" & e.DataTable.Compute("sum(消费金额)","出资人='" & e.DataRow("出资人") & "'")


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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/18 16:45:00 [显示全部帖子]

CurrentChanged代码没改,请认真看24楼

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


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

24楼第一段代码就是,照抄都不会!电脑的复制粘贴会用吧!

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