Skip to main content

AccessTr.neT


Liste Kutusunda Veri Arama

Liste Kutusunda Veri Arama

Çözüldü #1
Merhaba,
Liste kutusunda gösterilen üç sütun veriyi tek bir metin kutusuna göre metin kutusu change edildiği zaman listeyi güncellemesini istiyorum birkaç yöntem denedim ancak başarılı olamadım yardımcı olabilirseniz sevinirim.
örnek olarak hepsini ayrı ayrı metin kutuları ile arıyor bunu tek bir metin kutusu ile nasıl yapabilirim?
Son Düzenleme: 13/02/2022, 15:01, Düzenleyen: tanyeri.
Cevapla
#2
öncelikle arama yapılacak metin kutusunu ekleyin ismi txtKriter olsun
dağiştiğinde olayını aşağıdaki gibi düzenleyin
Private Sub txtKriter_Change()
Call Suz
End Sub
sonrada süzme fonksiyonunu
Sub Suz()
Krtr = txtKriter.Text
If Krtr <> "" Then Krtr = "[Kosul] Like '*" & Krtr & "*'"
Krtr = IIf(Krtr = "", vbNullString, "WHERE " & Krtr)
  Me.liste_teknikrapor.RowSource = "select * from Detay_TeknikRapor_HizliArama_Sorgusu " & Krtr
  With txtKriter
  .SetFocus
  .SelStart = Len(.Text)
  End With
End Sub
olarak değiştirin
son olarak da sorgu kodunuzu aşağıdaki kodla değiştirip öyle deneyin
SELECT Table1.ID, Table1.SEHIR, Table1.ULKE, Table1.Nufus, [SEHIR] & "|" & [ULKE] & "|" & [Nufus] AS Kosul
FROM Table1;
.rar deneme_hy.rar (Dosya Boyutu: 21,57 KB | İndirme Sayısı: 11)
Cevapla
#3
çok teşekkür ederim ilginiz için çok faydalı oldu
Cevapla
#4
Rica ederim
İyi çalışmalar
Sorun çözüldüyse cevaplanmışlara taşıyalım
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task