请教MSChart控件 要实现改变它的柱状显示形式的某一列的柱状图的颜色，该怎么写代码 谢谢！！

[aiwaweiwei]

谢谢！！

[aiwaweiwei]

????

[aiwaweiwei]

????

[lilaclone]

在该控件上单击右键，在弹出的属性框中选择“Series Color”标签列，在其中选择不同的Series后设置相应列的颜色

[aiwaweiwei]

在该控件上单击右键，在弹出的属性框中选择“Series Color”标签列，在其中选择不同的Series后设置相应列的颜色
这样就改变所有的颜色，我想改变具体一列的柱状图的颜色，能实现吗？

[hgwu]

可以在代码中改变的，不过要添加一个颜色对话框
With MSChart.Plot.SeriesCollection(index).DataPoints(-1)
.Brush.Style = VtBrushStyleSolid
.Brush.FillColor.Set red, green, blue
End With
上述代码中的index为具体每一列，因为颜色对话框中显示的颜色值不是RGB格式的，所以要转化一下，red，green，blue用下面的函数把对话框的颜色属性转化为RGB格式的
Public Function RedFromRGB(ByVal rgb As Long) _
As Integer
RedFromRGB = &HFF& And rgb
End Function

Public Function GreenFromRGB(ByVal rgb As Long) _
As Integer
GreenFromRGB = (&HFF00& And rgb) \ 256
End Function

Public Function BlueFromRGB(ByVal rgb As Long) _
As Integer
BlueFromRGB = (&HFF0000 And rgb) \ 65536
End Function