Soru Textbox içerisindeki "ı" harflerini "I" yapmak

[seckinb]

Merhaba
Tüm harfleri büyük olmaya zorladığım bir textbox'a sahibim.
Ascii olmadığı için "ı" harfi olduğu gibi kalıyor (sanırım)

If KeyAscii = ? Then KeyAscii =?

kodunu kullanmak istiyorum ancak keyascii karşılığını bulamadım.
Alternatif önerileriniz için teşekkürler

 

[Trilenium]

TextBox1 = StrConv(TextBox1, vbUpperCase)

 

[Haluk]

Private Sub TextBox1_Change()
    TextBox1 = Replace(StrConv(Replace(TextBox1, "i", "İ"), vbUpperCase), "ı", "I")
End Sub

.

 

[seckinb]

Elinize sağlık