How to make a pie chart in Visual Basic 2008

Visual Basic 2008 - Pie Chart! Just a simple tutorial on how to draw a pie chart using graphics :)

codes:
Public Sub DrawPieChart(ByVal percents() As Integer, ByVal colors() As Color, _
ByVal surface As Graphics, ByVal location As Point, ByVal pieSize As Size)
Dim sum As Integer = 0
For Each percent As Integer In percents
sum += percent
Next
Dim percentTotal As Integer = 0
For percent As Integer = 0 To percents.Length() - 1
surface.FillPie( _
New SolidBrush(colors(percent)), _
New Rectangle(location, pieSize), CType(percentTotal * 360 / 100, Single), _
CType(percents(percent) * 360 / 100, Single))
percentTotal += percents(percent)
Next
Return
End Sub

Button1_Click:
Dim percents() As Integer = {TextBox1.Text, TextBox2.Text, TextBox3.Text}
Dim colors() As Color = {Color.Blue, Color.Green, Color.Red}
Dim graphics As Graphics = Me.CreateGraphics
Dim location As Point = New Point(0, 0)
Dim size As Size = New Size(200, 200)
DrawPieChart(percents, colors, graphics, location, size)

Category:

Education

Tags:

• Microsoft
• Windows
• Visual
• Studio
• 2008
• 2005
• 2003
• 2010
• Express
• Edition
• Help
• Drawing
• In
• VB
• C#
• C++
• Pie
• Chart
• Diagram
• Graph
• coding
• programming

[StarStruckedSam]

thanks! this will help me in a new project

[hell858]

its better if you make it unlimited

[Tommoandlucysdad]

Great except for the awful music

[johancruyff100]

as to the percentage in the middle of colors. could you help me please?

[TheAgentbrady101]

@VisualDesignFX Yes but no, I found one way which may not be the best solution but I made a text box and the text property was """, a quotation, and made the message, for example,:

MsgBox("This is what a quotation looks like" + txtQuotation.text)

where txtQuotation is a textbox with a quotation mark as the text field

[dhruvsodha]

Thank you very much. Using this in my project.

You're awesome

[VisualDesignFX]

Is it possbile to put a " " " (the middle one...) in a message?

[mirandachen999]

How to show the PieChart on PictureBox?

[RoyMcAvoy]

somehow this code doesn't work on winform load. it only work when put in some event like button click. I'm not sure why is that but i'm still working on it.

[pj1205]

maybe if i had my speakers louder I could understand what you were doing. Love the parts where you wiggle the mouse around as "look here!"

[PBSBnets03]

Do you have any tutorial on how to create bar graph where in the values are being called by a query in sql? Thanks and God Bless. :)