Validating combobox text

[Lunatic3]

This piece of code does not work! whats wrong with it?

Private Sub ComboBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ComboBox1.KeyPress
        If e.KeyChar.IsDigit(e.KeyChar) = False Then
            e.Handled = True
        End If
End Sub

[Lunatic3]

No idea?