Soyada Göre Arama Hk.

[gundogdu42]

Arkadaşlar mrb.
Öncelikle yeni forum herkese hayırlı olsun.

Ekteki projemde müşteri listesindeki müşteri kayıtlarının atına bir textbox ekleyip ben kişinin soyadını yazmaya başladıkça arama yaparak listeye gelmesini nasıl yapabilirim. bir nevi süzme işlemi yani.

İlgileriniz için şimdiden teşekkürler.

 

[modalı]

Sayın gundoğdu42,

Bu active x nesnelerinden Microsoft Form TextBox ile gerçekleşebiliyor.

Gerisi SQL satırına WHERE i eklemek.

İyi çalışmalar

 

[gundogdu42]

Sayın modalı öncelikle ilginiz için tşk.

Arama fonksiyonu tam istediğim gibi harfi yazdıktan sonra bulmaya başlıyor ama textboxtaki yazılan harfleri sildikten sonra listedeki bütün isimler geri gelmiyor. yardımcı olurmusunuz

 

[modalı]

Sayın gundoğdu42,

Kusura bakmayın. Aceleden eksik yazmışım kodu:

Private Sub TextBox5_Updated(Code As Integer)
Dim strSuz, SQL As String
If Me.TextBox5 <> "" Then
strSuz = " '*" & Me.TextBox5 & "*'"
[COLOR=Red]Else
strSuz = "'*'"[/COLOR]
End If
SQL = "SELECT DISTINCTROW MUSTERI.
[*], MUSTERI.SOYADI, MUSTERI.ADI FROM MUSTERI WHERE MUSTERI.SOYADI LIKE " & strSuz & " ORDER BY MUSTERI.SOYADI;"

Me.Liste13.RowSource = SQL
End Sub

İyi çalışmalar