图表拷贝及放大问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

问题一：一次拷贝多图表，拷贝成功但只能出现一个图，代码如下该如何改写？

Dim Chart As WinForm.Chart

Chart= Forms("统计结果").Controls("Chrt1") Chrt1代表第一个图表我给命名的名称
图片点击可在新窗口打开查看

此主题相关图片如下：qq图片图表生成.png

Chart= Forms("统计结果").Controls("Chrt2")

Chart= Forms("统计结果").Controls("Chrt3")

Chart= Forms("统计结果").Controls("Chrt4")

Chart.CopyImage()

问题二：窗口里的图表如何实现放大缩小，比如说在图表右下角增加一个小加号或小减号来实现。

再或者鼠标放在某图表上时呈现浮窗效应，放大某图，鼠标离开又像之前一样正常显示。

哪个更容易实现呢？代码如何写

主题：图表拷贝及放大问题