以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助做窗口 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73475)
|
-- 作者：青岛hhh
-- 发布时间：2015/8/20 8:42:00
-- 求助做窗口
各位老师好：
想用Histogram分析项目各表数值的分布范围，参考了帮助里的例子
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart= Forms("窗口1").Controls("Chart1") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Histogram \' 设置图表类型
Chart.DataSource = "成绩表" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Histogram.IntervalStart = 0 \'指定起始值
Series.Histogram.IntervalWidth = 10 \'指定分区宽度
Series.Histogram.IntervalNumber= 10 \'指定分区个数
Series.Y.DataField = "成绩" \'Y轴绑定到数量列
想在窗口动态输入：
绑定表
起始值
分区宽度
分区个数
数量列
敬请各位老师指导帮助
|
-- 作者：大红袍
-- 发布时间：2015/8/20 9:11:00
--
如
Dim 绑定表 As String = e.Form.Controls("TextBox1").Text
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart= Forms("窗口1").Controls("Chart1") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Histogram \' 设置图表类型
Chart.DataSource = 绑定表 \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Histogram.IntervalStart = 0 \'指定起始值
Series.Histogram.IntervalWidth = 10 \'指定分区宽度
Series.Histogram.IntervalNumber= 10 \'指定分区个数
Series.Y.DataField = "成绩" \'Y轴绑定到数量列
|
-- 作者：青岛hhh
-- 发布时间：2015/8/20 14:53:00
--
范例的数据表是
姓名 成绩
a 80
b 90
c 100
我的数据表是
a b c
80 90 100
如何解决
|
-- 作者：有点蓝
-- 发布时间：2015/8/20 15:19:00
--
转换一下，把转换后的表绑定到图表 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=68546&replyID=&skin=1
|
-- 作者：青岛hhh
-- 发布时间：2015/8/20 15:50:00
--
统计表
产品 指标1 指标2 指标3---
绑定“统计表”后，在窗口中怎样用控件动态选择绑定数量列 指标1 指标2 指标3---
|
-- 作者：有点蓝
-- 发布时间：2015/8/20 16:00:00
--
加一个ComboBox内容就是指标1|指标2|指标3把二楼的代码写到valuechanged事件中 DataField =e.Sender.Text
|
-- 作者：大红袍
-- 发布时间：2015/8/20 16:05:00
--
汗
Dim 绑定表 As String = e.Form.Controls("TextBox1").Text
Dim 绑定列 As String = e.Form.Controls("TextBox2").Text
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart= Forms("窗口1").Controls("Chart1") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Histogram \' 设置图表类型
Chart.DataSource = 绑定表 \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Histogram.IntervalStart = 0 \'指定起始值
Series.Histogram.IntervalWidth = 10 \'指定分区宽度
Series.Histogram.IntervalNumber= 10 \'指定分区个数
Series.Y.DataField = 绑定列 \'Y轴绑定到数量列
|