Ex 33-2 Printing a Bar Chart

zavodney · October 26th, 2011, 10:35 PM

I finished Ex 33-2, Printing a Bar Chart. Of course, I just HAD to play with it. I filled the bars with colors, a different color for each bar. I tried creating an array with the brush names in it so I could add 1 line to the loop but Visual Studio balked at that and gave me "Value of type 'String' cannot be converted to 'System.Drawing.Brush'.". I ended up using a Select statement inside the loop. Is there a way to build the Brushes.color portion of the command line? I can "build" coordinates, font names and string values ... why can't I build the Brushes.color portion? I even tried creating an array as New SystemBrushes, but that didn't work either. Thank you.

Keith Z.

Rod Stephens · October 27th, 2011, 10:56 AM

Hi Keith,

An excellent idea!

There are ways you can convert things like color names into colors and then use them to make brushes, but it's a lot easier to just make an array of brushes. For example:

Code:

Dim bar_brushes() As Brush =
{
    Brushes.Red,
    Brushes.Green,
    Brushes.Blue,
    Brushes.Orange
}

Then you can use one of the brushes directly as in:

Code:

e.Graphics.FillRectangle(bar_brushes(2), Me.ClientRectangle)

zavodney · October 27th, 2011, 11:07 AM

That's what I was trying to do. I just couldn't find the right way. Thank you.

Keith Z.

zavodney · October 27th, 2011, 11:24 AM

It works fine. Thank you.

Keith Z.