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


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

主题：图表绑定
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2701 积分：17999 威望：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


加好友 发短信
等级：九尾狐 帖子：2701 积分：17999 威望：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


加好友 发短信
等级：九尾狐 帖子：2701 积分：17999 威望：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


加好友 发短信
等级：九尾狐 帖子：2701 积分：17999 威望：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


加好友 发短信
等级：九尾狐 帖子：2701 积分：17999 威望：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 [只看该作者]

例子发上来。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 4 次数据查询