Coba pake object DataCombo aja:
Sub isidivisi()
Set rs_divisi = New ADODB.Recordset
rs_divisi.Open "select kd_divisi,rtrim(divisi)
Divisi from tb_divisi order by kd_divisi", koneksi,
adOpenStatic, adLockOptimistic
Set c_divisi.RowSource = rs_divisi
c_divisi.ListField = "divisi"
c_divisi.BoundColumn = "divisi"
End Sub
pada form load tinggal panggil :
isidivisi
Rgd,
jenar suseno
--- JemyX Shinichi <[EMAIL PROTECTED]> wrote:
>
>
>
>
> hmm pake DBCombo (DAO) or DATACombo (ADO) aja .....
>
> ----- Original Message -----
> From: "ryu_hanazawa" <[EMAIL PROTECTED]>
> To: <[email protected]>
> Sent: Friday, September 23, 2005 8:41 AM
> Subject: [Programmer-VB] COMBO BOX , Gimana seh kk?
> Salah molo neh.. Help
> Me....!
>
>
> > KK Pgmr VB yg baek,
> > Nanya soal ComboBox.
> > Gmn Cara ambil 1 field dr db (Ms.Access) untuk
> dijadikan isi list dlm
> > combobox-nya, tanpa menggunakan cara looping dgn>>
> > if not rs.EOF
> > combo.additem=rs("..")
> > rs.movenext
> > , krn memperlambat kerja progrm. Saya dengar ada
> solusi yg lebih baik
> > dr itu, krn data yg akan diambil bisa mencapai
> ribuan.
> >
> > Kalau mengenai combo ketika GotFocus akan
> automatis muncul list
> > kebawah itu bgmn? Saya sudah prnah coba
> menggunakan Send Keys(%DOWN),
> > ketika diproject bisa jalan tapi ketika dibuat
> exe-nya ga bisa muncul
> > list combonya.
> >
> > THQYU yg bisa jawab.
> >
> >
> >
> >
> >
> >
> > Untuk keluar dari millis ini, kirim email kosong
> ke:
> > [EMAIL PROTECTED]
> >
> >
> > Yahoo! Groups Links
> >
> >
> >
> >
> >
>
>
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
------------------------ Yahoo! Groups Sponsor --------------------~-->
Most low income households are not online. Help bridge the digital divide today!
http://us.click.yahoo.com/cd_AJB/QnQLAA/TtwFAA/k7folB/TM
--------------------------------------------------------------------~->
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
