Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
20/07/2009 11:04
Konu Sahibi
alperadn01
Yorumlar
1
Okunma
1777
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

alperadn01

Aktif Üye
 40
 47
 192
 23/11/2008
0
 -
 
 Ofis 2003
 18/03/2019,11:09
Çözüldü 
arkadaşlar aşağıda gönderdiğim kelimenin ilk harfini büyük yapmakta hata ile karşılaşıyorum.
1.hata: caps lock tuşu açıkken İ harfi büyük olarak kalıyor küçük i harfine dönmüyor.
2.bir kişinin adresini yazarken bilindiği gibi kısaltmalar yapılmaktadır.örneğin Yunus Emre Mah.İstiklal Cad.No:16 gibi adreste nokta(.) işaretinden sonraki harfi de küçük yapıyor.Noktadan sonraki kelimenin ilk harfini büyük diğerlerini küçük yaptırmak istiyorum.
kod:
Private Sub İKAMETİ_AfterUpdate()
İKAMETİ = StrConv(İKAMETİ, vbProperCase)
ilk = Target
ilk= Replace(ilk, " ", " ")
ilk = Replace(ilk, " ", " ")
ilk = Replace(ilk, "I", "ı")
ilk = Replace(ilk, "İ", "i")
ilk = Replace(ilk, ".", ". ")
Target = StrConv(ilk, vbProperCase)
End Sub

bu kod üzerinden yardımcı olurmusunuz. şimdiden bütün arkadaşlara teşekkür ederim.



Kullanici Avatari

C*e*l*o*y*c*e

Uzman
Me.... B.....
 71
 3.197
 29/10/2008
983
 Ankara
 Yazılım
 Ofis 2010 32 Bit
 21/03/2019,00:06
Çözüldü 
güncelleştirme sonrasında olayına
Me.[İKAMETİ] = StrConv([İKAMETİ], 3) ...şeklinde
yada şu fonksiyonu BİR DENERMİSİNİZ...

Public Function MB(ByVal b As String) As String
MB = StrConv(b, vbUpperCase)
MB= Replace(MB, "i", "İ")
MB = Replace(MB, "ı", "I")
End Function




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Kaydet Butonuna Basıldığında Progressbar Hatası Veriyor Deniz DEMİRCİOĞLU 2 99 05/03/2019, 11:16
Son Yorum: Deniz DEMİRCİOĞLU
Çözüldü Log Hatası Alıyorum aliyuzen 10 385 04/03/2019, 17:00
Son Yorum: aliyuzen
Çözüldü İnternet Adresinden Stok Ve Fiyat Kontrolü Yapma kokotuna 2 159 11/02/2019, 20:00
Son Yorum: kokotuna
Çözüldü Açılır Kutularada Süzme Yapma akdemir1 9 255 05/02/2019, 16:42
Son Yorum: ozanakkaya
Çözüldü Tam Ekran Yapma Hk. acar6783 8 191 03/02/2019, 12:22
Son Yorum: ozanakkaya

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.