少し前(10月中旬)にアイコンのニャンコが旅立ちました。
次女が生まれてすぐにもらってきて、ほぼ18年。
火葬にしようかとも思ったのですが、所有している山へ埋葬する事に。
長男より長い付き合いでした。。。。
IT技術関連は.NETネタが主流のカキコになると思われます^_^;
まあヘッポコなので嘘の情報がまぎれているかも知れません。
ソースの流用はご自由に。ただし責任は取りません。
肥大型心筋症の為ICDを埋め込んでます。
諸々の雑談、巡った神社もUP
更新日付
最新投稿:素戔嗚神社(藤戸)
投稿日:2024年11月28日
既存投稿更新:高岡神社
更新日:2024年10月6日
投稿日:2024年11月28日
既存投稿更新:高岡神社
更新日:2024年10月6日
2013年11月16日土曜日
2013年11月12日火曜日
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)
(いきなり本題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)
登録:
投稿 (Atom)