Foxtable(狐表)用户栏目专家坐堂 → 图表绑定


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

主题:图表绑定

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
图表绑定  发帖心情 Post By:2015/10/15 19:46:00 [只看该作者]

如果设计一个按钮 
If e.Button = MouseButtons.Right Then  '右键点击显示
If Forms("图表放大窗口").Opened=False Then
    Forms("图表放大窗口").show
End If

如果加一个  图表放大窗口的 Chart3 对于 窗口a 的 Chart3 应该怎么加一下啊!

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/15 19:48:00 [只看该作者]

图表保存成图片,窗口放图片。

 

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

 


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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/10/15 20:08:00 [只看该作者]

谢谢 是这样的 我重新设计了一个窗口 用来显示放大的图标 想把功能放到右键
比如点击右键 然后就显示窗口A(另外一个已经关闭的窗口) ,窗口A有个Chart1 ,Chart1的数据就显示窗口BChart1的图标 可以吗? 感谢 

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/15 20:11:00 [只看该作者]

保存成图片,直接取图片的值

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/10/15 20:21:00 [只看该作者]

感谢 我用了 很方便 只是保存后就不能读取上面的数据了,可以用绑定的方法吗?
点击按钮 右键 显示窗口A chart1 绑定的窗口B 的chart1  
麻烦你了!

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/15 20:22:00 [只看该作者]

不能绑定,除非你拷贝代码重新生成一次。

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/10/16 0:17:00 [只看该作者]

感谢 感谢 
Dim tp As DateGroupEnum = Cols("日期A")
Dim cbx  = e.Form.Controls("ComboBox1")
Select Case cbx.Text
    Case "年"
        tp = DateGroupEnum.Year
    Case "季"
        tp = DateGroupEnum.Quarter
    Case "月"
        tp = DateGroupEnum.month
    Case "周"
        tp = DateGroupEnum.Week
    Case "天"
        tp = DateGroupEnum.None
    Case Else
        tp = DateGroupEnum.None
End Select

Dim g As New GroupTableBuilder(DataTables("表A"))
g.Groups.AddDef("日期B", tp, "日期A")

能帮我看看这个是那里不对吗?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/16 9:14:00 [只看该作者]

什么问题?报什么错?


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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/10/16 18:00:00 [只看该作者]

也没有那里报错,只是ComboBox1 这个功能没有取到作用 
我想是因为日期没有转的原因。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/16 18:14:00 [只看该作者]

例子发上来。

 回到顶部