Vb.net Türkçe karakter sorunu

Arkadaşlar bir program yazıyorum..
ElseIf Key = Keys.S Then
                TextBox.Text = TextBox.Text & "S"

böyle bir kod var..  Program ş,ğ,ü,i,ö yü tanımıyor...  Ben yukardaki kodu
ElseIf Key = Keys.Ş Then
                TextBox.Text = TextBox.Text & "ş"

bu şekilde yaptığımda kabul etmiyor.. Yardım edermisiniz???

System.Windows.Forms.Keys bunun içinde tr karakterler yok.. onu fark ettim.. nasıl ekliyebilirim???

çok teşekkür ederim çok aydınlattınız :D