Visual Basic - DataGrid - Escribir solo en mayusculas

Tengo un dataGrid, y quiero que solo se pueda escirbir en mayusculas en él, ahora bien coloque el mismo codigo que coloco para los TextBox y no me funciono

Private Sub dgd_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 8 'para borrar
Case 48 To 57 'numeros
Case 65 To 90 'mayusculas
Case 97 To 122 'minusculas conevertidas en mayusculas
KeyPress = KeyPress - 32
Case Else 'el resto no tipea
KeyPress = 0
End Select
End Sub

A que se debe esto?
Se hace de otra forma para el DataGrid ?

Olvidenlo, ya vi el errorsote que tengoe n el código ^_^