trims Bang Haer & Bang Aksan...coba di terapkan

  ----- Original Message ----- 
  From: Aksan Kurdin 
  To: [email protected] 
  Sent: Tuesday, May 18, 2010 5:54 PM
  Subject: Re: [belajar-access] DEFAULT VALUE


    
  Untuk bound form, bisa dimainkan dari defaultvalue property text box, karena 
nilai default akan tampil setiap kali form berada di new record.
  Untuk selalu mendapatkan nilai default value dari control yang terakhir di 
edit, semisal text box, bisa gunakan cara ini:



Private Sub txtAnu_AfterUpdate()
    Me.txtAnu.DefaultValue = """" & Me.txtAnu & """"
End Sub

Maka setiap kali txtAnu selesai di update, jika form di arahkan ke new record, 
field txtAnu akan berisi nilai txtAnu yang sebelumnya di update / di save.


  Untuk unbound form, default value hanya berfungsi untuk text yang diisikan 
lewat property window, dan akan menjadi nilai awal textbox saat form di open. 
  Cara di atas tidak akan berhasil.
  P. Maulana bisa menyimpan nilai itu dalam satu variabel global yang akan di 
panggil saat open form.


Dim NilaiDefaultAnuGlobal As String

Private Sub Form_Open(Cancel As Integer)
    Me.txtAnu = NilaiDefaultAnuGlobal
End Sub

Private Sub txtAnu_AfterUpdate()
    NilaiDefaultAnuGlobal = Me.txtAnu
End Sub

Aksan Kurdin

  On 5/18/2010 4:52 PM, Haer Talib wrote: 
      

    mainin property nya saja bang, property Default Value.



    Haer


    2010/5/18 Maulana <[email protected]>




      Dear All

      setiap/ salah satu textbox di design unbound dengan data inginya default 
value dan tidak di tampung di tabel dan sifatnya temporer...jika ingin di ambil 
kembali pada textboxt tersebut akan menampilkan default value tersebut...
      adakah script yang dapat membantu...

      salam






    -- 

    Jadikan www.gapura.web.id sebagai homepage browser anda.
    => Akses ke website favorit tinggal klik aja. (Lihat dulu deh).





  

Kirim email ke