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]
<mailto:[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 <http://www.gapura.web.id> sebagai homepage
browser anda.
=> Akses ke website favorit tinggal klik aja. (Lihat dulu deh).
