コンボボックスのマウスホイールでドロップダウンするのを無効にするには？

http://homepage1.nifty.com/MADIA/vb/vb_bbs2/200606/200606_06060104.html
から引用すると、

    'WM_MOUSEWHEEL を全てブロックするコンボボックス継承クラス
    Public Class myComboBox
        Inherits System.Windows.Forms.ComboBox

        Private Const WM_MOUSEWHEEL As Integer = &H20A

        Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
            If m.Msg <> WM_MOUSEWHEEL Then
                MyBase.WndProc(m)
            End If
        End Sub
    End Class

とすると良いらしい。