- VB.NET質問スレ(Part41)
842 ：デフォルトの名無しさん[sage]：2014/11/12(水) 06:40:17.22 ID:V1GADKHU - マウスホイールでトラックバーがスライドするのを無効にしたいんだけど上手い方法ってある？
ググったら「OnMouseWheelをオーバーライドして何もしないようにする」って方法が載ってたんで
既存のトラックバーを継承してホイール機能を削除したトラックバーを作ろうと思ったんだけど、
具体的に「何もしない」という部分をどう記述すればいいのか分からなくて困ってます
Public Class TrackBarNF 'ホイール禁止のトラックバー
Inherits System.Windows.Forms.TrackBar
Protected Overrides Sub OnMouseWheel(e As System.Windows.Forms.MouseEventArgs)
'ここに「何もしない」コードをどう記述するか
End Sub
End Class
↑とりあえずこんな感じでコード書いてみたけど、Protected〜End Subの間を空白にしただけだと
望む動作はしてくれず・・・
| - VB.NET質問スレ(Part41)
846 ：デフォルトの名無しさん[sage]：2014/11/12(水) 21:51:59.09 ID:V1GADKHU - >>843
ｻﾝｸｽ
オーバーライドの部分を
Protected Overrides Sub OnMouseWheel(e As System.Windows.Forms.MouseEventArgs)
Dim Hme As HandledMouseEventArgs
Hme = CType(e, HandledMouseEventArgs)
Hme.Handled = True
End Sub
としたら上手くいったっぽい
おかげで助かりました
|
|