kalo mau dari sql udah diproses, coba gini
Select sum(isnull(saldoakhir,0)) as saldo from tabel
where nosbbx like '2181%'
atau kalau mau dari VB
'Date: 19 Feb 99
'Developer: Heather McCaslin
Public Function NZ(CheckVar As Variant, Optional
ValIfNull As Variant) As Variant
If IsNull(CheckVar) Then
If IsMissing(ValIfNull) Then
' this translates to "" for strings, and 0
for numbers
NZ = Empty
Else
NZ = ValIfNull
End If
Else
NZ = CheckVar
End If
End Function
hasil fungsi ini jika tipe karakter adalah int
hasilnya 0, kalau string jadi ""
--- Oke WP <[EMAIL PROTECTED]> wrote:
> Memang null dari database sql (MySQL, MS SQL) gak
> bisa langsung diproses di VB.
> Biasanya aku pakai cara begini:
> - Jika fieldnya bertipe text (char, varchar, text,
> dll)
> hasil = rs!namafield + "" -> jika namafield=null
> hasilnya akan selalu empty string
> - Jika fieldnya bertipe numeric
> hasil = rs!namafield + 0 -> jika namafield=null
> hasilnya akan selalu 0
>
> jika mau dari perintah sql, tinggal tambahkan +0
> saja di perintah sqlnya
>
>
>
> aris <[EMAIL PROTECTED]> menulis:
> mungkin begini kl saya ngga salah paham,
>
> rs.open "Select sum(saldoakhir) as saldo from
> tabel where nosbbx like
> '2181%'
>
>
> if isnull(rs!saldo)then
> saldo=0
> else
> saldo=rs!saldo
> end if
>
>
>
> ----- Original Message -----
> From: azam
> To: [email protected]
> Sent: Wednesday, March 22, 2006 6:49 PM
> Subject: RE: [Programmer-VB] Re: ISNULL ga manjur
>
>
> Terima kasih rekan2.
> Sori kyaknya pertanyaan saya kurang jelas, jd byk
> alternatif jwbn.
>
> Saya punya tabel spt ini
>
> Nosbbx Saldoakhir
> 218120 0
> 218121 0
> 218220 200
> 218221 0
> 218921 200
> 218922 100
>
> kode program saya
>
> rs.open "Select sum(saldoakhir) as saldo from tabel
> where nosbbx like
> '2181%'
>
> yang ingin saya cari adalah jumlah saldoakhir nosbbx
> 2181xxx,2182xxx,2183xxx dst.
>
> Sedangkan nosbbx 2183xxx kan belum ada. Saya ingin
> jika nosbbx ada, maka
> saldo ditampilkan sesuai dg data, tp jika nosbbx ga
> ada, maka saldo = 0
>
> Contoh : utk nosbbx 2181xxx, saldo = 0
> utk nosbbx 2182xxx, saldo = 200
> utk nosbbx 2183xxx, saldo = 0 (pngennya)
> utk nosbbx 2189xxx, saldo = 300
>
> cara pengecekan saya
> if isnull(rs) then
> saldo=rs("saldo")
> else
> saldo = 0
> end if
>
> klo sy tambahkan field nosbbx pd rs.open ...,
> artinya saya harus group
> by nosbbx shg yg akan ditampilkan adl per record
> (bukan jumlahnya).
>
> Gmn solusinya selain menambah data pd field nosbbx.
> Tnx b4
>
>
> Best Regards,
>
>
> Azam
>
>
>
>
>
> Wahana Programmer Groups Links
>
>
>
>
>
>
>
> SPONSORED LINKS
> Programmer Indonesia Basic programming
> language Computer programming languages
> Programming languages Java programming language
>
> ---------------------------------
> YAHOO! GROUPS LINKS
>
>
> Visit your group "Programmer-VB" on the web.
>
> To unsubscribe from this group, send an email
> to:
> [EMAIL PROTECTED]
>
> Your use of Yahoo! Groups is subject to the
> Yahoo! Terms of Service.
>
>
> ---------------------------------
>
>
>
>
>
> ---------------------------------
> Apakah Anda Yahoo!?
> Kunjungi halaman depan Yahoo! Indonesia yang baru!
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
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/
