değiştiğinde olayı
Tarih
02/06/2011 09:55
Konu Sahibi
accessman
Yorumlar
12
Okunma
2307
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
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


Kur@l
AccessTR.Net
Kullanici Avatari
Uzman
2.029
05/11/2008
KONYA
Ofis 2010
15/11/2016,02:32
Çözüldü 
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


accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
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


alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
5.977
29/10/2008
Ordu
Ofis 2013 32 Bit
Dün,15:11
Çözüldü 
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


ercansahin
BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.738
14/11/2008
Ankara
Ofis 2010 32 Bit
Bugün,01:16
Çözüldü 
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.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
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


accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
(02/06/2011, 23:52)alpeki99 Adlı Kullanıcıdan Alıntı: 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







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Listede yoksa Olayı Hakkında Mecnun24 3 570 25/02/2016, 23:33 kenan827
Çözüldü SetFocus olayı fascioğlu 7 1.012 30/12/2015, 17:24 fascioğlu
Çözüldü Animasyon Clik Olayı ekselanss 11 2.212 08/12/2015, 13:48 alpeki99
Çözüldü Form kaydet olayı Denizl 9 1.145 05/09/2015, 16:35 Denizl
Çözüldü Rapor formunda bulunan seçeneklere bağlı gizle göster olayı fascioğlu 7 1.729 23/05/2014, 17:44 atoz112


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya