欢迎您:游客!请先
登录
或
注册
风格
恢复默认设置
|
展区
文件集浏览
图片集浏览
Flash浏览
音乐集浏览
电影集浏览
|
搜索
Foxtable(狐表)
→
用户栏目
→
专家坐堂
→ 生成图表
新的主题
投票帖
小字报
下一主题 >>
<< 上一主题
共有
1815
人关注过本帖
树形
打印
复制链接
主题:生成图表
大红袍
小
大
1楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:贵宾
帖子:
39310
积分:196782
威望:0
精华:1
注册:
2015/4/25 9:23:00
Post By:2016/5/8 11:29:00 [
显示全部帖子
]
[此贴子已经被作者于2016/5/8 11:32:55编辑过]
大红袍
小
大
2楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:贵宾
帖子:
39310
积分:196782
威望:0
精华:1
注册:
2015/4/25 9:23:00
Post By:2016/5/8 11:33:00 [
显示全部帖子
]
Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.SeriesList.Clear() '清除图表原来的图系
Chart.ChartType = ChartTypeEnum.Bar '设置图表类型
chart.AxisX.ClearValueLabel
Chart.BarClusterWidth = 80
Series = Chart.SeriesList.Add() '增加一个图系
Series.Length = 2
Series.X(0) = 0 '指定水平坐标
Series.Y(0) = 100 '指定垂直坐标
Chart.AxisX.SetValueLabel(0, "应完成") '指定字符表示
Series.X(1) = 1 '指定水平坐标
Series.Y(1) = 30 '指定垂直坐标
Chart.AxisX.SetValueLabel(1, "已完成") '指定字符表示
Chart.AxisX.AnnoWithLabels = True '启用字符标示
下一主题 >>
<< 上一主题
RSS2.0
|
Xhtml无图版
|
Xslt无图版
Copyright © 2000 - 2018
foxtable
.com
Tel: 4000-810-820 粤ICP备11091905号
Powered By
Dvbbs
Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询