Cara membuat grafik dengan Visual Basic

Cara membuat Grafik pada visual basic - Untuk membuat grafik pada tutorial ini  yang di butuhkan yaitu komponen Microsoft ADO Data Control (OLEDB), Microsoft Chart 6.0 (OLEDB), Microsoft Data Control 6.0 (OLEDB). untuk lebih jelas nya lihat gambar di bawah

Buatlah form seperti gambar berikut : 

Masukan Source code di bawah :

Silahkan ambil source code nya di group Tutorial visual basic Indonesia

Dim CONN As New ADODB.Connection
Dim RSDATA As New ADODB.Recordset

Sub KONEKSI()
Set CONN = New ADODB.Connection
Set RSDATA = New ADODB.Recordset
CONN.Open  "Provider=Microsoft.Jet.OLEDB.4.0;Data  Source=  "  &  App.Path  &
"\db1.mdb;Persist Security Info=False"
End Sub

Private Sub Form_Load()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "DATAKU"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
End Sub

Private Sub Command5_Click()
Dim  Nilai(1  To  6,  1  To  6)  '===>>>  inilah  yang  masih  harus  dicari
solusinya, karena tidak bisa berupa variabel
Call KONEKSI
RSDATA.Open "select * from dataku", CONN
RSDATA.Requery
a = 0
RSDATA.MoveFirst
Do While Not RSDATA.EOF
   a = a + 1
    Nilai(a, 1) = RSDATA!Data
    Nilai(a, 2) = RSDATA!frekuensi
    RSDATA.MoveNext
Loop

MSChart1.ChartData = Nilai
End Sub

Cara membuat grafik dengan Visual Basic 2012-12-06T14:34:00+07:00 Rating: 4.5 Diposkan Oleh: Unknown