pinginnya kayak apa mas
Private Sub TANGGAL_LostFocus()
Dim VARA As Variant
VARA = DLookup("COIL_OK", "T_PRODUCTION_FIGURE", "TANGGAL=# " &
Forms!F_PRODUCTION_MASTER!TANGGAL & "#")
GROSS_PRODUCTION_PCS_TODAY = VARA
End Sub
code diatas kan dah bisa.....
2010/4/8 Maulana <[email protected]>
>
> [Attachment(s) <#127daf72f834c2e2_TopText> from Maulana included below]
>
>
> bukan itu maksud saya mas...untuk lebih jelasnya saya lampirkan
> aja formnya...dan mohon di koreksi buat yg lainnya barangkali ada yang
> mirip-mirip
> ini stengah jadi..
>
> salam
>
>
> ----- Original Message -----
> *From:* hari yanto <[email protected]>
> *To:* [email protected]
> *Sent:* Wednesday, April 07, 2010 7:31 PM
> *Subject:* Re: [belajar-access] DATA TABEL
>
>
>
> Coba sintaxnya diperbaiki seperti ini:
>
> VARA = DLookup("COIL_ OK", "T_PRODUCTION_ FIGURE", "TANGGAL=#"
> & Forms!F_PRODUCTION_ MASTER!TANGGAL & "#")
> Mohon dicek juga format textbox tanggal pada form. Harus menggunakan date
> pula....
>
> Mungkin ini bisa membantu...
>
>
> --- On *Wed, 7/4/10, Maulana <[email protected]>* wrote:
>
>
> From: Maulana <[email protected]>
> Subject: [belajar-access] DATA TABEL
> To: "access" <[email protected]>
> Date: Wednesday, 7 April, 2010, 2:49 PM
>
>
> Dear All
>
> ada sintax sperti ini tapi kenapa y tidak bisa tampil pada
> textbox yang di inginkan
> ada textbox data diambil dari tabel
>
> Private Sub TANGGAL_LostFocus( )
> Dim VARA As Variant
> VARA = DLookup("COIL_ OK", "T_PRODUCTION_ FIGURE", "TANGGAL=#" &
> Forms!F_PRODUCTION_ MASTER!TANGGAL & "#")
> GROSS_PRODUCTION_ PCS_TODAY = VARA
>
> End Sub
> Salam
> MAulana
>
>
> ------------------------------
> New Email names for you!
> <http://sg.rd.yahoo.com/aa/mail/domainchoice/mail/signature/*http://mail.promotions.yahoo.com/newdomains/aa/>
> Get the Email name you've always wanted on the new @ymail and @rocketmail.
> Hurry before someone else does!
>
>
>
--
---------------------------------------------
grapyak-semanak-cluthak
http://djmumun.wordpress.com
http://facebook.com/djmumun
---------------------------------------------
