掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ショートカットキーを無効にするには? (ID:117515)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
あ〜! やっと解りました、ドラッグ・ドロップと勘違いしていました。 勘違いにつぐ勘違い申し訳ない。 KeyDownEventをフックしてClipBoardをテキストで無い場合、クリアーする位しか思いつきません。 Private Sub RichTextBox1_KeyDownEvent(ByVal eventSender As System.Object, ByVal eventArgs As _ AxRichTextLib.DRichTextEvents_KeyDownEvent) Handles RichTextBox1.KeyDownEvent Static BkeyCode As Integer Dim datobj As New System.Windows.Forms.DataObject() If BkeyCode = 17 And eventArgs.keyCode = 86 And System.Windows.Forms.Clipboard.GetDataObject.GetDataPresent( _ System.Windows.Forms.DataFormats.Text) <> True Then System.Windows.Forms.Clipboard.SetDataObject(datobj) Else BkeyCode = eventArgs.keyCode '一つ前の押されたキー End If End Sub 消したんじゃまずいかな。。。。。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.