Arkadaslar elinde gelenveri = Replace(gelenveri ,Chr(199),"Ç",1,-1,0)

function olan var mi ? komple tüm türkce karakterlerin büyük kücük karfine göre cevirecek. ?

Misal bendeki söyle ama yanlis ;büyügüde kücügüde ayni yapiyor ?
gelenveri = Replace(gelenveri ,Chr(208),"g",1,-1,0)
gelenveri = Replace(gelenveri ,Chr(240),"g",1,-1,0)