AccessTr.neT

Tam Versiyon: Büyük Harfe, Küçük Harfe Ve Türkçe Karakter Olmadan Küçük Harfe Çevirme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Merhaba,

Ekteki örnek uygulamada görebileceğiniz 3 farklı modül bulunmaktadır.
Bu modülleri Access çalışmanıza ekleyerek metin kutularına yazılan ifadelerin tümünü büyük, tümünü küçük ve tümünü Türkçe karakterler olmadan küçük harfe çevirebilirsiniz.

Kullanım Şekli:
Metin kutusunun güncelleştirme sonrası olayına

Büyük harfe çevirmek için: metinkutusu_adi=TumuBuyuk(metinkutusu_adi)

Küçük harfe çevirmek için: metinkutusu_adi=TumuKucuk(metinkutusu_adi)

Türkçe karakter olmadan küçük harfe çevirmek için: metinkutusu_adi=TumuKucuk_Eng(metinkutusu_adi)

Bu şekilde web adreslerini, mail adreslerini veya dilediğiniz başka verilerin doğru girilmesini sağlayabilirsiniz.
Paylaşım için teşekkürler hocam
(12/10/2018, 11:21)Allback yazdı: [ -> ]Merhaba,

Ekteki örnek uygulamada görebileceğiniz 3 farklı modül bulunmaktadır.
Bu modülleri Access çalışmanıza ekleyerek metin kutularına yazılan ifadelerin tümünü büyük, tümünü küçük ve tümünü Türkçe karakterler olmadan küçük harfe çevirebilirsiniz.

Kullanım Şekli:
Metin kutusunun güncelleştirme sonrası olayına

Büyük harfe çevirmek için: metinkutusu_adi=TumuBuyuk(metinkutusu_adi)

Küçük harfe çevirmek için: metinkutusu_adi=TumuKucuk(metinkutusu_adi)

Türkçe karakter olmadan küçük harfe çevirmek için: metinkutusu_adi=TumuKucuk_Eng(metinkutusu_adi)

Bu şekilde web adreslerini, mail adreslerini veya dilediğiniz başka verilerin doğru girilmesini sağlayabilirsiniz.
Teşekkür ederim işime yaradı.
Merhaba alttaki yerleri silince istediğim gibi oldu.
Yani tüm kelimeleri küçük harf yapmaya gerek kalmadı..

Elinize sağlık.

Kod:
Private Sub kucuk_AfterUpdate()
kucuk = TumuKucuk(kucuk)
End Sub

Private Sub kucukeng_AfterUpdate()
kucukeng = TumuKucuk_Eng(kucukeng)
End Sub