Skip to main content

AccessTr.neT


değiştiğinde olayı

değiştiğinde olayı

Çözüldü #1
iyi günler
isimleri aramak için kullandğım metin var
değiştiğinde olayında
-----
Bul = Metin1.Text
Me.Metin5.Value = Bul
-------
ben bu kodun metin içeriği 5 hane ve daha fazla olduğunda çalışması için ne yazmalıyım

if len(metin1.text)>4 then
--
--
end if

desem olur mu
@benbendedeilem
Cevapla
Çözüldü #2
Sayın Accessman;
Eğer bu kodu denerseniz işinizi gördüğünü görürsünüz.
Sanırım hatasız çalışır bu kod.
Kolay Gelsin.
Cevapla
Çözüldü #3
değiştiğinde olayında
değişmeden önceki ve sonraki değer değeri nasıl karşılaştırırız
mesela
metin içindeki değerin len değeri artarak değişiyorsa
msgbox " metnin harf sayısı artıyor"
eğer len değeri azalıyorsa
msgbox " metnin harf sayısı azalıyor"
mesajı çıkabilirmi
@benbendedeilem
Cevapla
Çözüldü #4
Olur ama Msgbox ile vermek kullanım rahatlığına aykırı gibi sanki. Bir etiket içerisinde göstermek daha kullanışlı olur bence.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #5
Olayın tam olarak ne işe yarayacağı ile ilgili bir fikrimiz olmadığından böyle bir şeyler hazırladık, umarım doğru anlamışızdır.
Tabi bu arada Bul olarak yazdığımız satırın değişken olarak tanımlanmış olması gerekmektedir. Sadece sizin yazdıklarınıza göre uyarlanmıştır.

Private Sub Komut1_Change()
Dim kriter As Integer
kriter = Len(Me.Metin1.Text)
If kriter > 4 Then
MsgBox "Limit Doldu", ,"DİKKAT"
Bul = Metin1.Text
Else
Me.Metin5.Value = Bul
End If
End Sub
Cevapla
Çözüldü #6
(02/06/2011, 23:52)alpeki99 yazdı: Olur ama Msgbox ile vermek kullanım rahatlığına aykırı gibi sanki. Bir etiket içerisinde göstermek daha kullanışlı olur bence.

tamam öyle olsun
kod nasıl olmalı
@benbendedeilem
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task