Foxtable(狐表)用户栏目专家坐堂 → 关与统计表的问题?


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

主题:关与统计表的问题?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/7 10:29:00 [显示全部帖子]

 做了上面一个,其它的参考着做

 

http://www.foxtable.com/help/topics/1058.htm

 

 

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


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/7 14:14:00 [显示全部帖子]

Dim bb As WinForm.ComboBox = e.Form.Controls("combobox6")
bb.ComboList=DataTables("表B").Getcomboliststring("月份")
bb.text = Format (Date.Today.AddMonth(1), "yy年mm月")

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/7 14:22:00 [显示全部帖子]

Dim bb As WinForm.ComboBox = e.Form.Controls("combobox6")
bb.ComboList=DataTables("表B").Getcomboliststring("月份")
bb.text = Format (Date.Today.AddMonth(1), "yy年mm月")

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/7 14:32:00 [显示全部帖子]

Dim bb As WinForm.ComboBox = e.Form.Controls("combobox6")
bb.ComboList=DataTables("表B").Getcomboliststring("月份")
bb.text = Format (Date.Today.AddMonths(1), "yy年MM月")

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/7 14:36:00 [显示全部帖子]

 MM大小写的问题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/7 19:07:00 [显示全部帖子]

Dim cbcdb As WinForm.ComboBox = e.Form.Controls("combobox2")

e.Form.Controls("Table1").Table.Filter = "月份 = '" & e.Form.Controls("ComboBox1").Text & "' and  产品 like '%" & cbcdb.text & "%'"
e.Form.Controls("ComboBox4").Text = e.Form.Controls("Table1").Table.Compute("sum(售价)")


 回到顶部