Home » » Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)
Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM) | Gho Blog's - Pada posting kali ini saya akan membagikan cara bagaimana membuat hitung total harga secara otomatis ketika record bertambah di tabel.

Disini saya menggunakan Datagrid sebagai komponen untuk menampilkan list dari tabel. Untuk lebih jelasnya, bagaimana cara memunculkan data di Datagrid, silakan sobat lihat kembali posting sebelumnya yang berjudul Cara Menampilkan Isi Data Tabel Di Datagrid Dengan Visual Basic 6.0. Karena pada psoting ini kita hanya fokus pada koding penghitungan nya saja.

Sebagai bahan latihan, buat dulu sebuah database dengan MS Access 2003 dan beri nama latihan.mdb. Sobat juga bisa menggunakan DBMS lainnya seperti MS Access 2007, tinggal disesuaikan saja nanti koding dari saya dengan database yang sobat gunakan. Untuk lebih jelasnya sobat bisa pelajari lagi melalui posting saya berikut ini :
Selanjutnya buat sebuah tabel dengan nama barang, berikut ini field-field nya :

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Jika sudah, coba sobat masukkan beberapa buah record ke dalam tabel tersebut, atau sobat bisa menambahkan proses Simpan/Save pada form di VB. Berikut ini contoh record yg di entrikan :

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Buka sebuah project kemudian tambahkan satu buah Datagrid, satu buah TextBox ke form dan satu buah ADODC.

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

 Kemudian tambahkan sebuah Module untuk koneksi database dan masukkan script berikut ini :


Setelah itu kita buat coding penghitungan total dari field harga yang muncul di Datagrid. Untuk itu silakan sobat lihat lagi posting sebelumnya yang berjudul Cara Menampilkan Isi Data Tabel Di Datagrid Dengan Visual Basic 6.0. Berikut ini coding penjumlahan total harga tersebut, letakan script berikut di bagian general coding form sobat :


Terakhir, sobat tambahkan dulu pemanggilan koneksi dan sub totalnya di bagian Form_Load :


Catatan :
Jika sobat menambahkan fungsi Simpan/Save pada Form, pastikan menyisipkan kode Call total pada koding Simpan yang ditempatkan setelah rs.Update seperti contoh berikut ini :


Silakan download contoh programnya pada link berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!






Contoh program ini bisa sobat terapkan pada project penjualan. Sekian dulu pembahasan dari saya yang berjudul Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM). Selamat mencoba dan semoga bermanfaat.



Share Posting Ini :


Berlanggan Artikel Via Email Dari Gho Blog's, GRATIS...! KLIK DISINI


13 komentar :

DIAN CITRA BUANA mengatakan... Reply Comment

bagus dan membantu sekali. makasih :)

Muhammad Dehidra Aktriyan mengatakan... Reply Comment

@DIAN CITRA BUANA:sama2... :)

Anonim mengatakan... Reply Comment

total harganya gak tampil. gimana caranya?

D'Hidra - MyBlogNetwork mengatakan... Reply Comment

@Anonim:gak nampil gmna gan...? cb sesuaikan conrol name yg agan pkai dgn yg ada di tutorial ini...

Anonim mengatakan... Reply Comment

Gimana Mengatasi Koneksi ke database gagal?

Ahyan R mengatakan... Reply Comment

Siippp.
Sempat binggung krn sy pake MSFlexiGrid. Tutor pke Query gak ngerti.
Makasih Bang.

Ahyan R mengatakan... Reply Comment

O ia bang. Waktu sy hapus data. Text Totalnya masih tdk berubah, kecuali sy stop dlu trs Run ulang project.

Gmn caranya agar Text1.Text menyesuaikan Total harga secara otomatis. Sy coba .Refresh gak mempan.

D'Hidra - MyBlogNetwork mengatakan... Reply Comment

@Ahyan R: pada saat menghapus data, sisipkan lagi coding pemanggilan totalnya...

Call total '<--- sisipkan pada even hapus nya

Fhycko mengatakan... Reply Comment

Met kenal bang.
Mau tanya, gimana membuat total perkalian sebuah angka yg menggunakan perkalian berbeda.
Contohnya :
1x2, 1x3, 1x4, 1x5
Setelah diproses menjadi 1x14.
Trima kasih sebelumnya..

Delis Hulu mengatakan... Reply Comment

keren broooo

D'Hidra Aktriyan mengatakan... Reply Comment

@Delis Hulu:makasih gan...

Unknown mengatakan... Reply Comment

Bro mau nanya kalo misal rumus If bisa gak ditambahkan ? Jd maksud sy Ada beberapa pernyataan Harga dan bisakah harga" tersebut ditambahkan??

D'Hidra Aktriyan mengatakan... Reply Comment

@Unknown:kyknya bisa aja bos... yg penting parameternya nya jelas.. gak ada mslah penggabungan logika if dlm fungsi aritmatika...

Posting Komentar

Berhubung Makin Banyaknya Komentar Yang Tidak Mematuhi Peraturan, Maka Setiap Komentar Yang Masuk Akan Di Moderasi (Diterbitkan Atas Persetujuan) Oleh Admin Terlebih Dulu.

Aturan Berkomentar
1. Silakan Berkomentar Dengan Baik Dan Sopan.
2. Komentar Sesuai Topik Artikel
3. Mohon Untuk Tidak Mencantumkan Link Aktif Pada Komentar.
4. Mohon Untuk Tidak Promosi Produk Disini (Dianggap Spam).
5. Komentar Menggunakan Akun Personal (mis. Akun Google), Bukan Akun Nama Produk Barang (Dianggap Promosi) dan Nama yang Mengarah ke URL Tertentu (Dianggap Spam).
6. Bila Komentar Tidak Sesuai Aturan Diatas Maka Komentar Tidak Diterbitkan Dan Akan Saya Hapus.

Spam = Delete...!!
Promosi = Spam = Delete...!!

Komentar Yang Sesuai Aturan akan Diterbitkan Selambat-Lambatnya Dalam 1x24 Jam.

-->Untuk Pertanyaan Yang Dirasa Penting (Urgent) Silakan Contact Saya Melalui Email Pada Link Berikut Ini : Contact Us


<-- Thank's -->

 
Copyright © 2014. Gho - Blog's - All Rights Reserved
Template Created by Creating Website Published by Mas Template