Scribd Logo
Upload

Welcome to Scribd!

  • 134 views

    Displaying Data in Chart in VB

    Uploaded by

    Mara Tanamal
    This document provides a tutorial on how to display data from a Microsoft Access database in a chart using Visual Basic .NET. It involves adding a chart control, connecting to the Access database, retrieving expense and sales data from two tables, and plotting the data for each category as a series on the chart. The code sample shows how to add series for expenses and sales, connect to the database, execute queries to retrieve the month and amount fields, and plot the points on each series using a data reader.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd

    Displaying Data in Chart in VB

    Uploaded by

    Mara Tanamal
    134 views6 pages
    This document provides a tutorial on how to display data from a Microsoft Access database in a chart using Visual Basic .NET. It involves adding a chart control, connecting to the Access database, retrieving expense and sales data from two tables, and plotting the data for each category as a series on the chart. The code sample shows how to add series for expenses and sales, connect to the database, execute queries to retrieve the month and amount fields, and plot the points on each series using a data reader.

    Original Description:

    Creating Chart in VB

    Copyright

    © © All Rights Reserved

    Available Formats

    DOCX, PDF, TXT or read online from Scribd

    Did you find this document useful?

    Is this content inappropriate?

    This document provides a tutorial on how to display data from a Microsoft Access database in a chart using Visual Basic .NET. It involves adding a chart control, connecting to the Access database, retrieving expense and sales data from two tables, and plotting the data for each category as a series on the chart. The code sample shows how to add series for expenses and sales, connect to the database, execute queries to retrieve the month and amount fields, and plot the points on each series using a data reader.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd
    Download as docx, pdf, or txt
    134 views6 pages

    Displaying Data in Chart in VB

    Uploaded by

    Mara Tanamal
    This document provides a tutorial on how to display data from a Microsoft Access database in a chart using Visual Basic .NET. It involves adding a chart control, connecting to the Access database, retrieving expense and sales data from two tables, and plotting the data for each category as a series on the chart. The code sample shows how to add series for expenses and sales, connect to the database, execute queries to retrieve the month and amount fields, and plot the points on each series using a data reader.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd
    Download as docx, pdf, or txt
    of 6

    Displaying Data in Chart in VB.

    Net

    This is a tutorial on how to add a chart to your visual basic .net application and
    display data as graph.

    I have a Microsoft Access database that holds information about Sales and
    Expenses.

    Table 1: Expenses: There are two fields in this table: Month, and Amount

    Table 2: Sales: There are two fields in this table: Month, and Amount

    I will display both data as a graph.


    First add a chart control to your project. Chart control is located in the Data
    section of your ToolBox

    The default chart comes with a default Series collection called Series1

    The Series is the title of data that we are displaying. In this tutorial we will
    display sales and expenses data from a database. Therefore our series
    collection will be Sales, Expenses.

    We will delete Series1 becuase we will replace it with Expenses and Sales.

    Right click the chart and click on properties. In the properties window, scroll
    down to Series and click on the small button next to Collection:
    In the window that appears, click on Series1 in the left list, click
    on Remove then Ok
    Now I will add a button to the form, and start adding the code to the button
    click event.
    Private Sub Button1_Click_1(sender As System.Object, e As System.EventArgs)
    Handles Button1.Click
    Chart1.Series.Add("Expenses")
    Chart1.Series.Add("Sales")
    End Sub

    Now I will add the code that will handle the connection to the database:

    Add the following code before your Public Class Form1:


    Imports System.Data.OleDb

    Then add the following code inside the button click event to connect to your
    Access database:
    Dim Conn As OleDbConnection = New OleDbConnection
    Dim provider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source ="
    Dim dataFile = "C:\Users\Jimmy\Desktop\Sales.accdb" ' Change it to your
    Access Database location
    Conn.ConnectionString = provider & dataFile
    Conn.Open()
    Then add the following code to the button click event to get the data from the
    database and display it into the chart:
    Dim cmd As OleDbCommand = New OleDbCommand("SELECT [Month],
    [Amount] FROM [Expenses]", Conn)
    Dim dr As OleDbDataReader = cmd.ExecuteReader
    While dr.Read
    Chart1.Series("Expenses").Points.AddXY(dr("Month").ToString,
    dr("Amount").ToString)
    End While
    dr.Close()
    cmd.Dispose()

    cmd = New OleDbCommand("SELECT [Month], [Amount] FROM [Sales]", Conn)


    dr = cmd.ExecuteReader
    While dr.Read
    Chart1.Series("Sales").Points.AddXY(dr("Month").ToString,
    dr("Amount").ToString)
    End While

    This is all the code for the button click event:


    Private Sub Button1_Click_1(sender As System.Object, e As System.EventArgs)
    Handles Button1.Click
    Chart1.Series.Add("Expenses")
    Chart1.Series.Add("Sales")
    Dim Conn As OleDbConnection = New OleDbConnection
    Dim provider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source ="
    Dim dataFile = "C:\Users\Jimmy\Desktop\test.accdb" ' Change it to
    your Access Database location
    Conn.ConnectionString = provider & dataFile
    Conn.Open()
    Dim cmd As OleDbCommand = New OleDbCommand("SELECT [Month], [Amount]
    FROM [Expenses]", Conn)
    Dim dr As OleDbDataReader = cmd.ExecuteReader
    While dr.Read
    Chart1.Series("Expenses").Points.AddXY(dr("Month").ToString,
    dr("Amount").ToString)
    End While
    dr.Close()
    cmd.Dispose()
    cmd = New OleDbCommand("SELECT [Month], [Amount] FROM [Sales]", Conn)
    dr = cmd.ExecuteReader
    While dr.Read
    Chart1.Series("Sales").Points.AddXY(dr("Month").ToString,
    dr("Amount").ToString)
    End While
    End Sub

    This is the first look of the Chart after clicking the button and displaying the
    data as graphs:
    You can change many of the chart properties as background color, font, size
    etc.

    You might also like