Access'te listbox'ları doldurmak ve güncellemek, diğer dillere göre çok daha kolaydır
Liste kutularını direkt olarak tablo veya sorgulara bağlayabilirsiniz,
liste kutusunun sadece satır kaynağını değiştirdiğinizde liste kutusu otomatik olarak güncellenecektir.

Private Sub Aranan_Adi_Change()

Dim Kaynak

    Kaynak = "SELECT adi, sicil, sicil1 FROM kullanicilar"

    Kaynak = Kaynak & " Where adi like '" & Me.Aranan_Adi.Text & "*' Order by adi"

    Me.Kullanici_Listesi.RowSource = Kaynak

End Sub

Örneğiniz ektedir.