Private Sub NumericUpDown1_ValueChanged(ByVal sender As System.Object, ByVal e _
  As System.EventArgs) Handles NumericUpDown1.ValueChanged
        If (NumericUpDown1.Value > 100) Then
            NumericUpDown1.Value = 0
            MessageBox.Show("Blubb")
        End If
    End Sub

--------------------

Ich habe keine besondere Begabung, sondern bin nur leidenschaftlich neugierig.
- Albert Einstein