Pages

Wednesday, June 30, 2010

Menghitung Jumlah Total Nominal Pada DataGridView

Fungsi berikut untuk menghitung Total_Belanja pada DataGridView:

Private Sub Hitung()
   Dim totalbelanja As Long
   totalbelanja = 0
   For t As Integer = 0 To DataGridView1.Rows.Count - 1
      totalbelanja = totalbelanja + Val(DataGridView1.Rows(t).Cells(index).Value)
   Next
   Label1.Text = totalbelanja
End Sub

32 comments:

  1. Gan, mau tanya.. kalau misal di datagrid view ada 5 kolom.. lalu harga yg mau dihitung ada di kolom 3.. coding di atas emank bisa jalan??
    mohon petunjuknya.. :)

    ReplyDelete
  2. Coding di atas bisa jalan gan tinggal disesuaikan aja index-nya berapa (alias kolom ke berapa) pada .Cells(index)

    ReplyDelete
    Replies
    1. kang klo minsalkan mau menampilkan berdasarkan tanggal bisa gak seandainya saya punya data belanja bulanan dan harian saya tpi dalam satu database nah saya ingin menghitung total belanja yg ada pada tanggal/bulan tertentu saja

      Delete
    2. sory sebelumnyo manggil akang dak jingok profil dulu aku tdi, dak taunyo wong kito pulo kk trisnadi nih,, mohon bantuanyo lah kk untuk tugas akhir aku nih..

      Delete
  3. kalau menjumlahkan baris(row) tertentu gmana coding'nya, mhon bantuannya www.yudadabye2.co.cc

    ReplyDelete
  4. Mau tanya gan.. kalau misal jumlah nominal yg mau dihitung ada kolom 4.. apa ditulis .Cells(4) ??

    ato .Cells(index:=4) ??

    dua-duanya udah ane coba,tapi gak bisa..
    mohon petunjuknya gan.. :)

    ReplyDelete
  5. @Christoven: Gunakan .Cells(3) karena terletak pada kolom ke-4 dan aturannya harus dikurangi 1 jadi 4-1 = 3. Semoga membantu :)

    ReplyDelete
  6. @Yuda: Sori baru saya reply sekarang. Untuk menjumlahkan pada cell tertentu gunakan perintah membaca data pada cell tersebut DataGridView1.Rows(t).Cells(index).Value lalu jumlahkan dengan data pada cell yang lainnya. Semoga membantu :)

    ReplyDelete
    Replies
    1. ada tutorialnya gak yg ini kang biar lebih paham saya,,,,,

      Delete
  7. Wah mas tks lho buat tutorialnya. Ini yang gw cari.....mantap....^_^v

    ReplyDelete
  8. saya coba di vb6 kok eror ya,,,
    pake datadrid

    mohon sarannya.. :)

    ReplyDelete
  9. Wahh gan. Coding di atas gak bisa untuk vb 6. Agan coba cari referensi lain :D

    ReplyDelete
  10. mas..saya berterimakasih banyak atas coding yang mas berikan diatas..
    benar2 membantu saya dalam pengerjaan Tugas..
    smoga Allah membalas kebaikan mas

    ReplyDelete
  11. untuk menghapus salah 1 row tu gimana mas?

    ReplyDelete
    Replies
    1. Datagridview1_cellclick
      If datagridview1.currentrow.index<> datagridview1.newrowindex then
      Datagridview1.rows.removeat(datagridview1.currenrow.index)
      End if

      Smoga bisa bantu

      Delete
  12. Trima kasih bgt gan, buat codingannya ngebantu bgt.

    ReplyDelete
  13. mas mau nanya klo menjumlahkan data yg sama gimana mas ? misal ada kolom elektronik dengan isi data misal, laptop ada 5 dan pc ada 3..tapi kita belum tahu jumlah tersebut haya tahu datanya ada dan kita ingin mengetahui jumlah 5 atau 3 tersebut mas tanpa perlu dihitung manual karena kalau ratusan akan repot bgt :). mohon bantuannya

    ReplyDelete
  14. agan mohon bantuanyya....

    nku jumlah data dari tabel temporary...

    coding berikut...
    Private Sub Hitung()
    Dim SubTotal As Long
    SubTotal = 0
    For t As Integer = 0 To DgTransBeli.Rows.Count - 1
    SubTotal = SubTotal + Val(DgTransBeli.Rows(t).Cells(6).Value)
    Next
    TextBox8.Text = SubTotal
    End Sub

    ditampilkan pada textbox8...
    tapi setiap saya tab tidak langsung jumlah apa nya gan...????

    ReplyDelete
  15. Gan mw nanya ne gmn mw mentotal harga keseluruhan pada data grid view. ane punya 6 cell row ny 2 dan ane mw mentotal cell ke 6 . gmn tuh codingnya...
    mohon bantuan nya yachhhh

    ReplyDelete
  16. This comment has been removed by the author.

    ReplyDelete
  17. cara menjumlahkan datagrid1 dengan koneksi adodc1 dengan database ms access dan dimunculkan di text9 bagaimana coding nya ya?
    koneksi database daya lewat propertis adodc1

    ReplyDelete
  18. gan gmn caranya menghitung kalau angkanya desimal?

    ReplyDelete
  19. mau tanya mas trisnadi
    klu menjumlahkan nilai filed ribuan gimana ya..
    knpa nilainya gk cocok..
    mohon pencerahan ya mas..

    tq

    ReplyDelete
  20. klo pengen menampilkan value totalbelanja di kolom baru di datagrid gmana caranya?

    ReplyDelete
  21. This comment has been removed by the author.

    ReplyDelete
  22. mas,, ini gmn cara penjumlahanya dalam 1 table kalo menggunakan desain form n datagridnya...?
    mohon bantuanya y mas....

    Uraian Jumlah

    Pengembangan ................... xxx
    Pengembangan ................... xxx
    Pengembangan ................... xxx

    Total xxx

    ReplyDelete
  23. kakak gimana caranya mencari nilai sesuai range di dalam 1 kolom ?

    ReplyDelete
  24. assalamualaikum gan, kalau misalnya saya mau menjumlahkan total bukan cuma untuk 1 field tapi ada 22 field itu bagaimana gan?DataGridView1.Rows(t).Cells(2).Value kalau code ini gan cuma field 2 aja yang kejumlah seluruh sedangkan ada banyak field yang mau saya total kan

    ReplyDelete
  25. assalamu'alaikum wr. wb. gmana caranya untuk mencari nilai terkecil dalam datagridview sesuai dengan nilai yang terkecilnya bukan 0 karena dalam datagridview tersebut nilainya pecahan?

    ReplyDelete