> For the complete documentation index, see [llms.txt](https://docs.layraweb.com.tr/merhaba/llms.txt). Markdown versions of documentation pages are available by appending `.md` to page URLs; this page is available as [Markdown](https://docs.layraweb.com.tr/merhaba/anadil/calismalar-ve-notlar/combolist-doldurma.md).

# ComboList Doldurma

"ComboDoldur" isimli bir fonksiyon oluşturuldu. Bu fonksiyon, RS32 kütüphanesindeki özellikleri kullanarak bir SELECT sorgusu yapmaktadır. Elde edilen veriler "f.combo\_sehir.AddToList()" komutu ile "combo list" alanına eklenmektedir.

```visual-basic
Function ComboDoldur(f As Object)
Dim Rs As RecordSet
  
  Rs:=PrepareStmDirect("SELECT id,sehir_adi FROM default_servis_sehir")
  If Not Rs.ExecuteStm() Then
    OutM("<<< HATA OLUŞTU >>> Sorgulama Çalıştırılamadı.")
    Return
  EndIf
  f.combo_sehir.SelectTextInList("Seçim Yapın") 
  While Rs.MoveNext()
    f.combo_sehir.AddToList(Rs.sehir_adi)
  Wend
  Rs.Close()
EndFunction
```

{% content-ref url="/pages/0IbQMI74CMS2MvBdti95" %}
[AddToList](/merhaba/anadil/kutuphane/kontrol-nesneleri/listbox-ve-combobox/addtolist.md)
{% endcontent-ref %}

{% content-ref url="/pages/iB9Id9pJbOESU1FT2nDS" %}
[SelectTextInList](/merhaba/anadil/kutuphane/kontrol-nesneleri/listbox-ve-combobox/selecttextinlist.md)
{% endcontent-ref %}

{% content-ref url="/pages/aGkPXagCOaY0deVnHSRE" %}
[PrepareStmDirect](/merhaba/anadil/kutuphane/rs32/fonksiyonlar/preparestmdirect.md)
{% endcontent-ref %}