mas, coding baris yg sy buat spt ini ;

Private Sub Form_Activate()
If Not trans_incoming.Recordset.RecordCount = 0 Then
trans_incoming.Recordset.MoveFirst
Do While Not trans_incoming.Recordset.EOF
trans_incoming.Recordset.Delete
trans_incoming.Recordset.MoveNext
Loop
End If
    For b = 1 To 10
        trans_incoming.Recordset.AddNew
        trans_incoming.Recordset!no = b
        trans_incoming.Recordset.Update
    Next b
    trans_incoming.Recordset.MoveFirst
end sub

Nah, untuk coding penjumlahan total juml barang baris 1 s/d 10 menurut
mas patintang/rekan2x yg lain bgm ? terus terang sy msh bingung.
nb: koneksinya sy pakai ADODC

thx,
pupunk

Pada tanggal 11/25/05, patintang <[EMAIL PROTECTED]> menulis:
> Coba pakai yg begini :
> Sub HitungSubTotalTabel()
> Dim b As Long
> Dim Total As Double
>
> ' b menyatakan baris ke..
> ' 6 collom yang mau dijumlahkan
>
> Total = 0
> For b = 1 To Tabel.Rows - 1
>    Total = Total + CDbl(Tabel.TextMatrix(b, 6))
> Next b
> TxtTotal.Text = Format(Total, "#,##")
> End Sub
>
> pooh wrote:
>
> > coba pake property rows.count
> >
> >     -----Original Message-----
> >     *From:* [email protected]
> >     [mailto:[EMAIL PROTECTED] *On Behalf Of *pupunk
> >     *Sent:* Tuesday, November 22, 2005 1:38 PM
> >     *To:* [email protected]
> >     *Subject:* [Programmer-VB] hitung baris
> >
> >     temen2x, bgm cara menghitung juml barang secara keseluruhan ? sy pakai
> >     dbgrid & sy buat baris 1 s/d 10. nah bgm cara menghitung total juml
> >     barang secara keseluruhan tsb dari baris 1 s/d 10.
> >     sebelumnya sy ucapkan terimakasih.
> >
> >     salam,
> >     pupunk
> >
> >
> >     Untuk keluar dari millis ini, kirim email kosong ke:
> >     [EMAIL PROTECTED]
> >
> >
> >
> >
> >     ------------------------------------------------------------------------
> >     YAHOO! GROUPS LINKS
> >
> >         *  Visit your group "Programmer-VB
> >           <http://groups.yahoo.com/group/Programmer-VB>" on the web.
> >
> >         *  To unsubscribe from this group, send an email to:
> >            [EMAIL PROTECTED]
> >           <mailto:[EMAIL PROTECTED]>
> >
> >         *  Your use of Yahoo! Groups is subject to the Yahoo! Terms of
> >           Service <http://docs.yahoo.com/info/terms/>.
> >
> >
> >     ------------------------------------------------------------------------
> >
>
>
>
>
> Untuk keluar dari millis ini, kirim email kosong ke:
> [EMAIL PROTECTED]
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
>


------------------------ Yahoo! Groups Sponsor --------------------~--> 
Get fast access to your favorite Yahoo! Groups. Make Yahoo! your home page
http://us.click.yahoo.com/dpRU5A/wUILAA/yQLSAA/k7folB/TM
--------------------------------------------------------------------~-> 

Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-VB/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Kirim email ke