Skip to main content

AccessTr.neT M.


Formda Metin Kutusu İçerik Kontrolü

Formda Metin Kutusu İçerik Kontrolü

Çözüldü #1
Merhabalar,
Bir formda yeralan altformda imlecin yeraldığı satırdaki değerin belli bir karakter kümesini içerip içermediğini kontrol etmek istiyorum. Ekteki örnekte olduğu gibi imleç altformda bir satırdayken "Yenile" butonuna bastığımda ok işaretinin altındaki metin kutusunda bu harf dizinini içerir veya içermez diye yazdırmak istiyorum. bu olayı ekstra sorgular ekleyerek yapılabilir ama programa ekstra başka sorgu eklemeden kod bazında nasıl yapabilirim.
Örneğin, altformdaki değerler "DARA, PARA, KARAM, GRAM, ARMA, TARAK, KIRAÇ". bu değer satırlarından imlecimi  "DARA, PARA, KARAM, TARAK" içeren satırlara bırakıp "yenile dediğimde Metin7 Metin kutusunda "ARA İÇERİYOR" yazsın, diğerleri seçiliyken "ARA İÇERMİYOR" yazsın istiyorum.
Ekstra sorgu eklemeden nasıl yapabilirim?
Saygılarımla.

.rar ICEREN TESPITI.rar (Dosya Boyutu: 26,11 KB | İndirme Sayısı: 1)
Cevapla
#2
ana forma

Visual Basic Code
Option Compare Database

satırının altına

Visual Basic Code
Public txtDeger As String

kodunu,
alt forma aşağıdaki kodu ekleyip

Visual Basic Code
Private Sub DEGER_GotFocus()
Me.Parent.txtDeger = Me.DEGER
End Sub

yenile butonun koduna da "me.refresh" satırından önce

Visual Basic Code
Me.Metin7 = IIf(InStr(1, txtDeger, "ARA", 1) > 0, "ARA İÇERİYOR", "ARA İÇERMİYOR")

kodunu ekleyip dener misiniz?

Cevapla
...........
#3
yada doğrudan sadece alttaki kodu yazın yenile butonunun koduna

Visual Basic Code
Dim txtDeger As String
txtDeger = Me.ALTFORM.Controls("deger")
Me.Metin7 = IIf(InStr(1, txtDeger, "ARA", 1) > 0, "ARA İÇERİYOR", "ARA İÇERMİYOR")
Me.Refresh

Cevapla
#4
çok teşekkür ederim @"halily"
tam olarak istediğim oldu. aklınıza, fikrinize sağlık.
problemim çözülmüştür.

Cevapla
...........
#5
ÖD )
iyi çalışmalar
kolay gelsin

Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task