Textboxa yazdığım isim Listboxa gelmiyor

[gundogdu42]

Arkadaşlar mrb,

Textboxa yazdığım harfe göre listboxa gelmiyor.
Daha önce Access 2003 versiyonunda geliyordu şimdi 2007 versiyonu yükledik gelmiyor.
Bu soruna nasıl bir çözüm bulabiliriz.
İlgilenen herkese şimdiden teşekkürler.

Private Sub TextBox5_Updated(Code As Integer)
Dim strSuz, SQL As String
If Me.TextBox5 <> "" Then
strSuz = " '*" & Me.TextBox5 & "*'"
Else
strSuz = "'*'"
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

 

[gundogdu42]

Yokmu arkadaşlar yardımcı olacak. Konu acil.

 

[Mahmut Bayram]

Keypress olayına yazıp dener misiniz!

Private Sub TextBox5_KeyPress(ByVal KeyAscii As Object)
Dim strSuz, SQL As String
If Me.TextBox5 <> "" Then
strSuz = " '*" & Me.TextBox5 & "*'"
Else
strSuz = "'*'"
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

 

[gundogdu42]

Mrb,

Mahmut bey öncelikle yardımınız için çok teşekkürler.
Bu şekilde istediğim oldu, Fakat yazdıklarımı sildiğimde listboxda aynı şekilde kalıyor. yani eski durumuna dönmüyor. aynı şekilde alanı boşaltan buton yaptım ondada alan boşalınca listbox eski haline gelmiyor.
Bununla ilgili de bir öneriniz olurmu.

 

[Mahmut Bayram]

Bende * basınca listbox eski haline geldi.
access ten çıkınca durduruldu diye de hata verdi.

 

[akd]

ofis2007 gelişimini tamamlamadan, ofis2010 çıkartılar,
ofis2010 çok güzel bu sorunlarla karşılaşmazsınız.