成人午夜视频全免费观看高清-秋霞福利视频一区二区三区-国产精品久久久久电影小说-亚洲不卡区三一区三区一区

vb.net監(jiān)視按鍵的簡單介紹

利用VB.NET怎樣使窗體在沒有焦點時也能檢測鍵盤事件?

窗體內檢測按鍵

創(chuàng)新互聯(lián)專注于錯那網站建設服務及定制,我們擁有豐富的企業(yè)做網站經驗。 熱誠為您提供錯那營銷型網站建設,錯那網站制作、錯那網頁設計、錯那網站官網定制、小程序設計服務,打造錯那網絡公司原創(chuàng)品牌,更為您提供錯那網站排名全網營銷落地服務。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Me.KeyPreview = True '注冊窗體的鍵盤事件

End Sub

在TextBox1中顯示按鍵代碼

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown

TextBox1.Text = Str(e.KeyCode) + vbCrLf

End Sub

窗體沒有焦點,用窗體監(jiān)測鍵盤輸入緩沖區(qū)可以解決,但這似乎可以用于監(jiān)測用戶輸入內容,不要用于非法目的呀!所以就是知道也不會告訴你的。

vb.net中如何設計一個監(jiān)控程序?

以記事本為例

Public Class Form1

Public Sub ShellAndWait(ByVal ProcessPath As String)

Dim objProcess As System.Diagnostics.Process

Try

objProcess = New System.Diagnostics.Process()

objProcess.StartInfo.FileName = ProcessPath

objProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal

objProcess.Start()

objProcess.WaitForExit()

objProcess.Close()

Catch

MessageBox.Show("無法執(zhí)行文件 " ProcessPath, "錯誤")

End Try

End Sub

'監(jiān)視程序就可以了,若果監(jiān)視別的窗體的話,用SPY++ 找到句柄,配合FindWindowEx,SendMessage根據(jù)其屬性做

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

ShellAndWait("Notepad.exe")

MessageBox.Show("筆記本被關閉后我才會出現(xiàn)")

End Sub

End Class

vb.net 2008 怎樣進入調試模式?怎樣逐語句運行?怎樣添加監(jiān)視?

在VB環(huán)境中執(zhí)行源代碼,本身就是調試模式

按F8即可逐語句運行

點擊語句左端空白處,將其背景色變?yōu)樯罴t,就是添加斷點,運行到該語句會停下來

可以在變量、對象等語句上點擊右鍵,選擇“添加監(jiān)視”即可

網站欄目:vb.net監(jiān)視按鍵的簡單介紹
網頁URL:http://jinyejixie.com/article24/dddhoje.html

成都網站建設公司_創(chuàng)新互聯(lián),為您提供商城網站、企業(yè)網站制作、網站導航動態(tài)網站、、自適應網站

廣告

聲明:本網站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)

網站托管運營
拜泉县| 长沙县| 玉溪市| 金平| 公安县| 名山县| 隆昌县| 曲麻莱县| 朝阳市| 五莲县| 泰和县| 恩平市| 嘉荫县| 军事| 重庆市| 清新县| 乌兰浩特市| 宜宾市| 宜宾市| 井陉县| 广元市| 交城县| 德阳市| 陇西县| 绥芬河市| 临沧市| 藁城市| 繁峙县| 祁门县| 正阳县| 会东县| 福泉市| 修文县| 宝丰县| 诸城市| 资溪县| 安陆市| 大田县| 开鲁县| 广河县| 驻马店市|