String ten TR karakterleri temizleme
Loading ...Bazen bir string teki Türkçe karakterler başımıza dert olabilir. Bunları temizlemek için aşağıdaki fonksiyonu kullanabilirsiniz.
Public Function TRSiz(ByVal vdata As String) As String
Dim tmp As String
tmp = Replace(vdata, "İ", "I")
tmp = Replace(tmp, "İ", "I")
tmp = Replace(tmp, "ı", "i")
tmp = Replace(tmp, "Ğ", "G")
tmp = Replace(tmp, "ğ", "g")
tmp = Replace(tmp, "Ş", "S")
tmp = Replace(tmp, "ş", "s")
tmp = Replace(tmp, "Ç", "C")
tmp = Replace(tmp, "ç", "c")
tmp = Replace(tmp, "Ü", "U")
tmp = Replace(tmp, "ü", "u")
TRSiz = tmp
End Function
Kolay Gelsin.
Benzer Yazılar
Eğer yazıyı beğendiyseniz ya da ekleyecekleriniz varsa, lütfen yorumunuz yazın veya RSS aboneliği ile yeni yazılardan anında haberdar olun.
Yorumlar
Henüz Yorum Yok.
Yorum Yazın