求vb生成这样柱状图图片的代码

加一个Picture控件，AutoRedraw = true，BackColor=白，ScaleMode= 3-pixel

成都创新互联公司于2013年成立，公司以网站制作、网站建设、系统开发、网络推广、文化传媒、企业宣传、平面广告设计等为主要业务，适用行业近百种。服务企业客户超过千家，涉及国内多个省份客户。拥有多年网站建设开发经验。为企业提供专业的网站建设、创意设计、宣传推广等服务。 通过专业的设计、独特的风格，为不同客户提供各种风格的特色服务。

然后把数据放到数组里面，我的程序里面数组叫 datainput

代码给你， 你自己去微调吧

Private Type Bar

BarName As String

BarData(1 To 3) As Integer

End Type

Dim dataInput(10) As Bar

Dim dataInputCount As Integer

Const XXX = 10

Const YYY = 100

Private Sub Command4_Click()

dataInputCount = 3

dataInput(1).BarName = "2001"

dataInput(1).BarData(1) = "10"

dataInput(1).BarData(2) = "20"

dataInput(1).BarData(3) = "30"

dataInput(2).BarName = "2002"

dataInput(2).BarData(1) = "15"

dataInput(2).BarData(2) = "25"

dataInput(2).BarData(3) = "35"

dataInput(3).BarName = "2003"

dataInput(3).BarData(1) = "18"

dataInput(3).BarData(2) = "28"

dataInput(3).BarData(3) = "38"

Dim i As Integer

Dim j As Integer

For i = 1 To dataInputCount

For j = 1 To 3

Select Case j

Case 1: Picture1.ForeColor = vbRed

Case 2: Picture1.ForeColor = vbGreen

Case 3: Picture1.ForeColor = vbBlue

End Select

Picture1.Line (XXX + i * 50 + j * 10, YYY)-(XXX + i * 50 + j * 10 + 5, YYY - dataInput(i).BarData(j)), , BF

Next j

Next i

End Sub

在VB中使用VBA生成柱形图表怎么实现？

可以生成图表，图表中的数据源用下面的代码在A7：G13位置sheet2的表A1：B5

在指定的位置图（子）

设置AB =范围（“A7： G13）'生成图表位置

设为BBB = ActiveSheet.ChartObjects.Add（0，0，0，0）

bbb.Chart.ChartType = xlColumnClustered的柱形图

bbb.Chart。数据源SetSourceData来源：=表（“Sheet2的”）范围（“A1：B5”）'

BBB

= ab.Top

左= ab.Left，

。的宽度= ab.Width

高度= ab.Height

尾与

尾子

VB向网页中传输数据，并在网页中生成柱状图

你的操作是想点击一个按钮，打开IE浏览器，然后IE浏览器的内容是你之前编辑过的数据以图表的形式存在，是吗

如果是这样，可以这样做，在你的程序目录建立一个Excel文件，用VB打开这个Excel文件，然后向里面写入数据，数据写好后，用VB控制这个Excel文件生成柱状图并保存成网页的格式的文件，比如data.html

然后点击那个按钮，用IE浏览器来打开这个data.html，这样就得到你想要的效果了，其实VB和Excel里的VBA配合起来，还是很简单的，有不明白的Hi我

vb.net中使用Chart控件如何更改柱子宽度？

在 series 集合编辑器 里找到杂项 customproperties 里的 pointwidth 设置

将vb.net中怎样生成柱形图

引用microsoft chart control6.0(sp4)

添加mxchart空件

mxchart空件可以实现各种图形，什么饼，柱，三角，线，都可以。而且可以是立体的。

vb.net柱状图实时显示

chart控件和timer控件，用timer控件触发chart控件中系列数据的更新。

分享名称：vb.net做柱状图,winform 柱状图
标题路径：http://kswjz.com/article/hssdcp.html