Permitir numeros, bloquear letras

[VelascoCalderon]

Ya encontre la solucion, os la muestro a acontinuacion por si algun dia os hace falta. Hacen falta lo siguiente:

Private Sub dataGridView1_EditingControlShowing( _
ByVal sender As Object, _
ByVal e As DataGridViewEditingControlShowingEventArgs) _
Handles DataGridView1.EditingControlShowing

'Referencia a la celda
Dim validar As TextBox = CType(e.Control, TextBox)

'Agregar el controlador de eventos para el KeyPress
AddHandler validar.KeyPress, AddressOf validar_Keypress

End Sub


' Evento Keypress
Private Sub validar_Keypress( _
ByVal sender As Object, _
ByVal e As System.Windows.Forms.KeyPressEventArgs)

'Obtener indice de la columna
Dim columna As Integer = DataGridView1.CurrentCell.ColumnIndex

' Verificar columna actual
If columna = 2 Or columna = 3 Then
Dim caracter As Char = e.KeyChar

' referencia a la celda
Dim txt As TextBox = CType(sender, TextBox)

' Comprobar si es un número con isNumber, si es el backspace, si el caracter
' es el separador decimal, y que no contiene ya el separador
If (Char.IsNumber(caracter)) Or _
(caracter = ChrW(Keys.Back)) Or _
(caracter = ",") And _
(txt.Text.Contains(",") = False) Then


e.Handled = False
Else
e.Handled = True
End If
End If

End Sub

Saludos!!