Salam VB,
nJlh_A=0 'set variabel utk total field A = 0
nJlh_B=0
'lakukan proses perulangan/looping sebanyak record yg di filter
for i=1 to rs.recordcount 'proses looping-nya
nJlh_A=Jlh_A+rs.fields("A")
nJlh_B=Jlh_B+rs.fields("B")
rs.movenext
next i
'isi nilai textbox
textbox1.text=nJlh_A+nJlh_B
Mohon maaf sy sdh 6 bln ini tdk bs bls postingan ke forum, pesannya selalu
menunggu approve dr moderator :-)
jd sy hy bs bls lgsg k email mas aja...
Semoga membantu...
________________________________
GENERASI COMPUTER
Berbagi Ilmu Visual Basic Bagi Pemula
http://www.generasicomputer.com
Hp. 08126514562
________________________________
________________________________
From: sodikin vk <[email protected]>
To: Yopie Sofianto <[email protected]>
Sent: Fri, December 4, 2009 12:31:46 PM
Subject: Re: [Programmer-VB] Menjumlah
Terima kasih banyak atas reponnya
cuma saya belum begitu mengerti
Saya jelaskan lebih detail:
tampilan yang saya buat dalam bentuk listview
data filternya sudah bisa tampil di listview.
dan saya ingin menambahkan 1 textbox lagi untuk menampilkan total jumlah
yang tampil di listview tersebut.
Maaf sekali lagi saya masih newbiew dan belajar otodidak tentang vb jadi saya
juga belum tahu istilah looping, jadi tolong jelaskan sekali lagi
terima kasih
--- On Fri, 4/12/09, Yopie Sofianto <[email protected]> wrote:
>From: Yopie Sofianto <[email protected]>
>Subject: Re: [Programmer-VB] Menjumlah
>To: [email protected]
>Cc: "sodikin vk" <[email protected]>
>Date: Friday, 4 December, 2009, 12:04 PM
>
>
> >
>
>
> Salam VB,
>
>sSQL= "SELECT * FROM NAMATABEL WHERE DIVISI='C' AND TANGGAL >= #' &
>DTPICKER1.VALUE & "#' AND TANGGAL <= #' & DTPICKER2.VALUE & "#'"
>
>trus buat looping
>nJlh_A=0
>nJlh_B=0
>for i=1 to rs.recordcount
> nJlh_A=Jlh_A+rs.fields("A")
> nJlh_B=Jlh_B+rs.fields("B")
> rs.movenext
>next i
>
>
>Semoga membantu...
>
>________________________________
GENERASI COMPUTER
>Berbagi Ilmu Visual Basic Bagi Pemula
>
>http://www.berbagi-ilmu-vb.ge165.com/
>
>Hp. 08126514562
>________________________________
>
>
>
>
>
>
________________________________
From: sodikin vk <[email protected]>
>To: [email protected]
>Sent: Fri, December 4, 2009 11:13:03 AM
>Subject: [Programmer-VB] Menjumlah
>
>
>Selamat siang master semua
>
>Saya punya tabel
>
>Tanggal Divisi A B
>1/12/09 C 5 5
>3/12/09 C 5 5
>25/12/09 D 5 5
>
>Saya ingin Jumlah total dari divisi C dari tanggal 1/12/09 s/d 3/12/09
>bagaimana code nya?
>
>terima kasih
>
>
>
________________________________
New Email names for you!
>Get the Email name you've always wanted on the new @ymail and @rocketmail.
>Hurry before someone else does!
>
>
>
________________________________
Get your new Email address!
Grab the Email name you've always wanted before someone else does!