TextBox numerico en C# y VB.NET

Codigo C#:

private void TextBox1_KeyPress(object sender, KeyPressEventArgs e)
{
    if (!Char.IsDigit(e.KeyChar)) // Si no es numerico 
    {
        // Invalidar la accion
        e.Handled = true;
        // Enviar el sonido de beep de windows
        System.Media.SystemSounds.Beep.Play();
    }
}

Codigo VB.NET:

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs)

    If Not Char.IsDigit(e.KeyChar) Then

        ' Invalidar la accion
        e.Handled = true ' Si no es numerico
        ' Enviar el sonido de beep de windows
        System.Media.SystemSounds.Beep.Play()

    End if

End Sub

Publicado en tttony.blogspot.com