189 8069 5689

vb.net图表 vba 图表

Vs2010中,vb.net写网页代码里面有和chart图表工具 点击其他 控件给其赋值,每次都是

在窗体上添加一个Chart1控件和一个Button1控件:

成都创新互联公司于2013年成立,先为双清等服务建站,双清等地企业,进行企业商务咨询服务。为双清企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

完整代码如下:(复制就可以用)

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Chart1.Series.RemoveAt(0)   '清除原来的系列

Dim i As Integer

Dim j As Integer

For i = 0 To 11    '设置有12个系列

Chart1.Series.Add("系列"  i + 1)

''添加数据点的个数

For j = 0 To 3   '设置有4个数据点

Chart1.Series(i).Points.Add()

Next

Next

'用生成的随机数(范围[2.0,9.9]),作为数据

Randomize()

For i = 0 To 11

For j = 0 To 3

Chart1.Series(i).Points(j).YValues = {Int((99 - 20 + 1) * Rnd() + 20) / 10}   '将随机数据赋值给图表点的Y值

Next

Chart1.Series(i).ChartType = DataVisualization.Charting.SeriesChartType.Column    '设置图表类型

Next

End Sub

End Class

VB.NET 有木有什么漂亮的第三方图表控件 大

.NET 的第三方控件首推Devexpress

不过这个控件学起来有些难度,官方文档全是英文的;而且国内资料较少

vb.net怎么绘制带坐标轴的的一次函数?最好附上源码。

1、利用公式求出Y值  第一列设置表头为x,下面依次填入取值, 比如 x 1 2 3 4 ...... 第二例表头设置为y,在下面表格中填入计算公式 如 =2*x+1 然后选中点右下角的十字型标记,拖下去,和前面x数量一致。 2、然后选中数据源(即选中要进行操作的数据区域,这里指XY值所在区域。) 3、执行菜单命令插入——图表——XY散点图  执行命令,打开图表向导对话框选XY散点图--选平滑线散点图--完成  最后使用图表向导在横坐标填入x值,纵坐标填入y值,生成图即可 将一次函数的Y列用公式编辑出来,分别填写出当取不同的X值时得到不的函数值,选择函数值所在列,插入——图表按提示操作。执行菜单命令 执行菜单命令


网页标题:vb.net图表 vba 图表
链接分享:http://cdxtjz.cn/article/dojjpij.html

其他资讯