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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 图表的bug

共有12271人关注过本帖树形打印复制链接主题：图表的bug

狐狸爸爸

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2010/3/1 9:04:00 [显示全部帖子]

收到，我抽空看看

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2010/3/2 12:05:00 [显示全部帖子]

Dim Chart As WinForm.Chart = e.Form.Controls("Chart1")
Dim Series as WinForm.ChartSeries
Chart.DataSource = "表A"
Chart.ChartType = ChartTypeEnum.Bar
Chart.SeriesList.Clear()
For each i As Col in Tables("表A").Cols
    If i.Name <> "xm" Then
        Series = Chart.SeriesList.Add()
        Series.Text = i.Name
        Series.X.DataField = "xm"
        Series.Y.DataField = i.Name
        Series.Y.DataType = GetType(Double)
    End If
Next
Chart.Inverted = True
Chart.Stacked = True
Chart.LegendVisible = True
Chart.LegendCompass = CompassEnum.East

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2010/3/4 16:58:00 [显示全部帖子]

以下是引用reachtone在2010-3-3 16:08:00的发言：
还有就是，插入到Excel中的图表，打印出来很不清晰，不知能否给图表设置清晰度。

下次更新后，可以保存为wmf格式，这样就可以无级缩放，不变形。

下一主题 >> << 上一主题

主题：图表的bug