anda harus buat cmbIDAgama yg nantinya visible=False (tersembunyi)
pada waktu cmbagama di klik, cmbIDAgama listindexnya selalu ikut
codenya
Private SAub cmbagama_Click()
cmdIDAgama.listindex = cmbAgama.listindex
End Sub
nah seperti itu
jadi Anda klo mo simpan ya ambilnya dari cmbIDAgama.Text
selamat mencoba!
-andre-
-senior programmer www.indosystem.net-
www.indosystem.net masih mencari programmer untuk jadi junior programmer saya
info lebih lanjut liat di website pilih Lowongan Pekerjaan
thanks
<[EMAIL PROTECTED]> wrote:
Teman-teman VB, saya ada membuat program database dgn teknologi lama
DAO(maklum permintaan user) dengan menghubungkan langsung yg diset
lewat properties.Dan saya ada tabel agama yang field-field dgn isinya sbb:
IDAgama | NamaAgama |
|01 | Islam |
|02 | Protestan |
|03 | Katholik |
|04 | Hindu |
|05 | Budha |
Masalahnya sbb:
Saya sdh buat program SIMPAN yang menggunakan COMBOBOX (jadi memilih
langsung di COMBOBOX nya akan ada tampilan ISLAM, PROTESTAN, KATHOLIK,
HINDU, BUDHA).Saya ambil contoh pilih ISLAM, terus saat saya tekan
tombol SIMPAN yang tersimpan adalah field IDAgama saja,yaitu => 01
bukan field NamaAgama => ISLAM.
Adapun script saya buat kalau menggunakan COMBOBOX sbb:
DtAgama.Recordset.AbsolutePosition = cmbagama.ListIndex
DtKeluarga.Recordset!IDAgama = DtAgama.Recordset!IDAgama
Nah, pertanyaan saya, bgmana kalau menggunakan TEXTBOX(tidk pakai
COMBOBOX)..? Jadi saat saya isi ISLAM di TEXTBOX, maka saat saya
tekan tombol SIMPAN yang tersimpan di tabel DataKeluarga adalah field
IDAgama nya -> 01 bukan field NamaAgama -> ISLAM.
Mohon pencerahannya.Thank
Salam,
D.Adam
---------------------------------
Looking for last minute shopping deals? Find them fast with Yahoo! Search.
[Non-text portions of this message have been removed]
