VB.NET NumericUpDownコントロール

VB.NET で、NumericUpDownを使用しようかと・・・
（いきなり本題w）

で、お決まりのEnterキーでの項目遷移

OnKeyDownイベントでSelectNextControlを動かせば良いらしい。

で、実行。

動くけどBeep音がやかましい。

ググってみたけどなかなかHitしない。
諦めかけた時、ありました。
で、下記が反映させたソース

    '''' <summary>
    '''' キーダウン
    '''' </summary>
    Protected Overrides Sub OnKeyDown(ByVal e As System.Windows.Forms.KeyEventArgs)
        If e.KeyCode = Keys.Enter Then
            e.SuppressKeyPress = True
            Me.FindForm.SelectNextControl(Me, True, True, True, True)
        End If
        MyBase.OnKeyDown(e)
    End Sub

NumericUpDownの派生クラスで作ってみたけど
まあ、普通にイベントを拾えばできるんじゃあないかなぁ・・・

これだけで反日もとい半日かかった　orz
（どうしてこんな誤変換を・・・w）