Bueno si la unica forma de hacerlo es con keypress y ya salio asi que aki dejo la programación por si le es util a alguien.
Codigo VB net:
Cita: Private Sub txtdescri2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtdescri2.KeyPress
'si el caracter es letra
If Char.IsLower(e.KeyChar) Then
'acepta el caracter
e.Handled = True
'convertir en mayusculas
SendKeys.Send(Char.ToUpper(e.KeyChar))
End If
End Sub
ADIOS