RE:Solo Numeros en datagridview
Hola, revisa este código.
Private Sub dgvSucursales_EditingControlShowing(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) Handles dgvSucursales.EditingControlShowing
AddHandler e.Control.KeyPress, AddressOf Validar_Numeros
End Sub
Private Sub Validar_Numeros(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs)
Dim Celda As DataGridViewCell = Me.dgvSucursales.CurrentCell()
If Celda.ColumnIndex = 0 Then
If e.KeyChar = "."c Then
If InStr(Celda.EditedFormattedValue.ToString, ".", CompareMethod.Text) > 0 Then
e.Handled = True
Else
e.Handled = False
End If
Else
If Len(Trim(Celda.EditedFormattedValue.ToString)) > 0 Then
If Char.IsNumber(e.KeyChar) Or e.KeyChar = Convert.ToChar(8) Then
e.Handled = False
Else
e.Handled = True
End If
Else
If e.KeyChar = "0"c Then
e.Handled = True
Else
If Char.IsNumber(e.KeyChar) Or e.KeyChar = Convert.ToChar(8) Then
e.Handled = False
Else
e.Handled = True
End If
End If
End If
End If
End If
End Sub
Saludos.