Cara Menghitung Jumlah Total di Datagrid VB 6.0

Bagaimana cara menjumlahkan Total Data didalam Datagrid VB 6.0. Jika anda membuat sebuah Aplikasi dengan VB 6.0 dan bermain data di Datagrid, maka biasanya anda butuh untuk menjumlahkan data. Penjumlahan Total di datagrid sangatlah mudah, anda dengan koding sederhana yang kami buat pasti anda akan sangat mudah mengikutinya.

Berikut dibawah adalah cara untuk menghitung Jumlah Total data didalam datagrid.
Yang pertama pastikan anda sudah bisa mengkoneksikan database kedalam Datagrid.

Bagi anda yang ingin menggunakan Database Access 2003, silahkan KLIK LINK INI
Bagi anda yang ingin menggunakan Database Access 2007, silahkan KLIK LINK INI

Jika anda sudah bisa membuat Koneksi Database dan Data sudah muncul di Datagrid, silahkan anda masukan Label1 dan Text1 kedalam sebuah Form. Sehingga design formnya seperti gambar dibawah ini :

Jika sudah membuat Form seperti gambar diatas, pada Form Load, masukan koding dibawah ini :

Adodc1.Recordset.MoveFirst
Total = 0
Do While Not Adodc1.Recordset.EOF
    Total= Total + Adodc1.Recordset!JumlahBarang
    Adodc1.Recordset.MoveNext
Loop
Text1 = Total

Kemudian silahkan anda Run Project anda. Dengan langkah diatas maka akan muncul seperti gambar paling atas pada Tutorial ini. Bagaimana Sangat Mudah bukannnn???

Silahkan KLIK DISINI untuk mendownload Tutorial Pembelajaran VB 6.0 diatas