Membuat Grafik Pada Visual Basic 2008

Untuk membuat grafik pada VB NET bisa melalui laporan (report) atau melalui form. Saya akan mengajarkan menampilkan grafik pada form VB .NET menggunakan komponen Microsoft Chart Control 6.0 (SP4) (OLEDB).

Langkah-langkah membuat grafik pada form sebagai berikut:

1. Buka sebuah project lalu tambahkan sebuah form baru.

2. Pada menu Tools pilih Choose Toolbox Items.

3. Pada window Choose Toolbox Items masuk ke tab COM Components lalu centang Microsoft Chart Control 6.0 (SP4) (OLEDB), klik OK.

4. Pada Toolbox sudah terdapat komponen Microsoft Chart Control 6.0 (SP4) (OLEDB), pillih, lalu tambahkan pada form Anda.

5. Sekarang form Anda telah terdapat komponen tampilan grafik dan langkah selanjutnya adalah membuat coding untuk menampilkan grafik tersebut.

Beberapa atribut dasar yang terdapat pada AxMSChart:

.chartType untuk menentukan tipe/jenis tampilan grafik

.ColumnCount untuk menentukan jumlah grafik atau perbandingan tampilan grafik

.RowCount untuk menentukan berapa banyak baris data angka/nilai yang akan ditampilkan pada grafik

.ColumnLabel untuk menampilkan label pada kolom grafik

.RowLabel untuk menampilan label pada baris angka/nilai grafik

.Data untuk menentukan nilai dari data grafik baik untuk kolom maupun baris

.Row untuk menentukan baris

.Column untuk menentukan kolom

Berikut ini adalah contoh coding untuk menampilkan grafik:

Dim T As Integer

'Tentukan jenis tampilan grafik

AxMSChart1.chartType = MSChart20Lib.VtChChartType.VtChChartType2dBar

AxMSChart1.RowCount = 5 'Menentukan jumlah baris adalah 5

AxMSChart1.ColumnCount = 2 'Menentukan jumlah grafik adalah 2

'Perulangan

For T = 1 To AxMSChart1.RowCount 'Here it is dynamically and will work in all cases of values for AxMSChart1.Row

'Set that we want to edit the row "T"

AxMSChart1.Row = T

'Setting it's label to T

AxMSChart1.RowLabel = T

'Memanipulasi grafik 1

AxMSChart1.Column = 1 'Set that I want to edit the first graph

AxMSChart1.Data = T * 20

'Memanipulasi grafik 2

AxMSChart1.Column = 2 'Set that I want to edit the second graph

AxMSChart1.Data = T * 15

Next

Jika Anda ingin membuat grafik perbandingan antara satu grafik dengan grafik yang lain buatlah jumlah kolomnya (column) lebih dari 1 sesuaikan dengan jumlah perbandingan grafik. Jangan pusing @_@ dengan istilah kolom (column) dan baris (row) pada grafik. Kalian bisa lihat pada tampilan form Grafik Penjualan di bawah ini. Baris (row) ditunjukkan dengan angka 1 s.d. 5 pada sumbu X sedangkan kolom terlihat pada banyaknya grafik di salah satu baris (misalnya baris 1 terdapat dua grafik yaitu grafik hijau dan grafik merah berarti ada 2 kolom).

Tampilan grafik dari coding di atas: