benim isimler rehberim var buna sayaç koydum arttırıp azaltabiliyosunuz. örneğin arttırdınız sayaç 3 e çıktı benim listemde 3 harfli isimleri göstermesini istiyorum 4e çıkardık dört harfli isimler çıkacak düşürdüğümde ise sayaç kaçtaysa o harf sayılı isimler çıkcak yardımcı olursanız sevinirim...

Sn emrah1992;
Lütfen forum kurallarını okuyunuz..

Kodlar;

Option Compare Database



Private Sub Form_Activate()

DoCmd.Maximize

End Sub



Private Sub Komut111_Click()

If IsNull(sayac) Then

sayac = 1

Else

sayac = sayac + 1

End If

sqlifade = "SELECT erkekisimleri.*, Len([İSİM]) " & _

 "FROM erkekisimleri " & _

 "WHERE (((Len([İSİM]))=[sayac]));"

Liste1.RowSourceType = "table/query"

Liste1.RowSource = sqlifade

Liste1.Requery

End Sub



Private Sub Komut112_Click()

If IsNull(sayac) Or sayac = 1 Then

sayac = 1

Else

sayac = sayac - 1

End If

sqlifade = "SELECT erkekisimleri.*, Len([İSİM]) " & _

 "FROM erkekisimleri " & _

 "WHERE (((Len([İSİM]))=[sayac]));"

Liste1.RowSourceType = "table/query"

Liste1.RowSource = sqlifade

Liste1.Requery

End Sub



Private Sub sayac_AfterUpdate()

sqlifade = "SELECT erkekisimleri.*, Len([İSİM]) " & _

 "FROM erkekisimleri " & _

 "WHERE (((Len([İSİM]))=[sayac]));"

Liste1.RowSourceType = "table/query"

Liste1.RowSource = sqlifade

Liste1.Requery

End Sub



Private Sub TextBox3_Updated(Code As Integer)

sqlifade = "select * from erkekisimleri where İSİM like Formlar!Form1!TextBox3 & '*'"

Liste1.RowSourceType = "table/query"

Liste1.RowSource = sqlifade

Liste1.Requery

End Sub



Private Sub TextBox6_Updated(Code As Integer)

sqlifade = "select * from erkekisimleri where İSİM like '*' & Formlar!Form1!TextBox6 & '*'"

Liste1.RowSourceType = "table/query"

Liste1.RowSource = sqlifade

Liste1.Requery

End Sub





Private Sub TextBox7_Updated(Code As Integer)

sqlifade = "select * from erkekisimleri where ANLAMI like '*' & Formlar!Form1!TextBox7 & '*'"

Liste1.RowSourceType = "table/query"

Liste1.RowSource = sqlifade

Liste1.Requery

End Sub

Peki üste açılan kutu ekleyip içinede isim kökenlerini koyacağız. seçeceğimiz isim kökenine listede eşit olanlar çıkacak. örneğin arapça seçildiğinde listede isim kökeni arapça olanlar çıkmasını istiyoruz.
(yardımcı olduğunuz için çok teşekkür ederiz)

yardımcı olurmusunuz..

Bu yeni bir konu

Moderatör arkdaşlardan rica ederim konuyu taşısınlar
veya iptal etsinler.

Sabırsızlanıp bir daha mesaj attığınız
için cevap veriyorum; sorunuz sitede muhtelif zamanlarda
işlenen ilişkili combobox - listbox - subform vb. filtrlemelerle ilgili.
Sedece kendi konumuzu okumak gibi bir alışkanlığımız olduğu
için sorular tekrar tekrar geliyor

İlişkisel combobox

Kolay gelsin

---

Sn Emrah 1992 sitede ilk uyarı puanını sizden
aldım. Teşekkür ederim. Umarım bu size daha
dikkatli bir üye olmanız konusunda yardımcı olur.
Geçmişte hocalarım bu davranışın adını da koymuşlardı
belki arama moturundan bulabilirsiniz

Kolay gelsin

Harf sayısına göre süzgeç
İsim kökenine göre süzgeç ektedir
Kolay gelsin

Not Textbox3 için yazmış
olduğunuz sqlcumle hatalıydı
onu kaldırdım