nimbrung ngasih tips, boleh ya ...
sub chkdatayesno_afterupdate()
me.text5 = iif(me.datayesno,50000,0)
end sub
logikanya sama, tetapi kode cukup sebaris.
aksan kurdin
On 4/18/2011 10:49 AM, sudarsono wrote:
1. Field yang dimaksud bertype YesNo ( misal nama fieldnya DataYesNo )
2. tambahkan Control CheckBox , beri nama misal ChkDataYesNo
3. buat event after Update , misal :
sub chkDataYesNo_afterupdate ()
If Me.DataYesNo.Value Then
Me.Text5.Value = 50000
Else
Me.Text5.Value = 0
End If
end sub
coba modif sendiri ....
'===
--- In belajar-access@yahoogroups.com, "nash_siraj" <nash_siraj@...> wrote:
>
> Salam, kenal tuk smua. saya newcomer dlam Access. mau tanya bagaimana cara membuat checkbox list, yang dihubungkan dengan field tertentu, misalnya dalam check box pendaftaran, jika saya centang tanda check bok, maka dalam field pendaftaran akan terisi angka 50000, dll....
> makasih banyak atas bantuannnya.....
>
> sbagai bahan kajian saya lampirkan contoh file mdbnya
>
__._,_.___
No comments:
Post a Comment