VB.net 中如何獲取鍵盤(pán)輸入的ASCii碼

Private?Sub?Form1_KeyPress(ByVal?sender?As?Object,?ByVal?e?As?System.Windows.Forms.KeyPressEventArgs)?Handles?Me.KeyPress

站在用戶(hù)的角度思考問(wèn)題，與客戶(hù)深入溝通，找到甘德網(wǎng)站設(shè)計(jì)與甘德網(wǎng)站推廣的解決方案，憑借多年的經(jīng)驗(yàn)，讓設(shè)計(jì)與互聯(lián)網(wǎng)技術(shù)結(jié)合，創(chuàng)造個(gè)性化、用戶(hù)體驗(yàn)好的作品，建站類(lèi)型包括：網(wǎng)站制作、成都網(wǎng)站設(shè)計(jì)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣、域名注冊(cè)、網(wǎng)絡(luò)空間、企業(yè)郵箱。業(yè)務(wù)覆蓋甘德地區(qū)。

If?Asc(0)?Then

textbox1.text="0"

end?if

end?sub

vb.net 獲取鍵盤(pán)輸入的字符

參考方法如下，具體解釋已經(jīng)注解在代碼中；

/定義變量

public delegate int HookProc(int nCode, Int32 wParam, IntPtr lParam);

static int hKeyboardHook = 0;

HookProc KeyboardHookProcedure;

/*************************

* 聲明API函數(shù)

* ***********************/

// 安裝鉤子 （using System.Runtime.InteropServices;）

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingC.StdCall)]

public static extern int SetWindowsHookEx(int idHook,HookProc lpfn, IntPtr hInstance, int threadId);

// 卸載鉤子

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingC.StdCall)]

public static extern bool UnhookWindowsHookEx(int idHook);

// 繼續(xù)下一個(gè)鉤子

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingC.StdCall)]

public static extern int CallNextHookEx(int idHook, int nCode, Int32 wParam, IntPtr lParam);

// 取得當(dāng)前線程編號(hào)（線程鉤子需要用到）

[DllImport("kernel32.dll")]

static extern int GetCurrentThreadId();

//鉤子子程：就是鉤子所要做的事情

private int KeyboardHookProc(int nCode, Int32 wParam, IntPtr lParam)

{

if (nCode = 0)

{

/****************

//線程鍵盤(pán)鉤子判斷是否按下鍵

Keys keyData = (Keys)wParam;

if(lParam.ToInt32() 0)

{

// 鍵盤(pán)按下

}

if(lParam.ToInt32() 0)

{

// 鍵盤(pán)抬起

}

****************/

/****************

//全局鍵盤(pán)鉤子判斷是否按下鍵

wParam = = 0x100 // 鍵盤(pán)按下

wParam = = 0x101 // 鍵盤(pán)抬起

****************/

KeyMSG m = (KeyMSG) Marshal.PtrToStructure(lParam, typeof(KeyMSG));//鍵盤(pán)

// 在這里添加你想要做是事情(比如把鍵盤(pán)nCode記錄下來(lái),搞個(gè)郵件發(fā)送程序發(fā)到自己的郵箱去)

return 0;//如果返回1，則結(jié)束消息，這個(gè)消息到此為止，不再傳遞。如果返回0或調(diào)用CallNextHookEx函數(shù)則消息出了這個(gè)鉤子繼續(xù)往下傳遞，也就是傳給消息真正的接受者

}

return CallNextHookEx(hKeyboardHook, nCode, wParam, lParam);

}

//鍵盤(pán)結(jié)構(gòu)

public struct KeyMSG

{

public int vkCode; //鍵值

public int scanCode;

public int flags;

public int time;

public int dwExtraInfo;

}

// 安裝鉤子

public void HookStart()

{

if(hKeyboardHook == 0)

{

// 創(chuàng)建HookProc實(shí)例

KeyboardHookProcedure = new HookProc(KeyboardHookProc);

// 設(shè)置線程鉤子

hKeyboardHook = SetWindowsHookEx( 13,KeyboardHookProcedure,Marshal.GetHINSTANCE(Assembly.GetExecutingAssembly().GetModules()[0]),0);

//************************************

//鍵盤(pán)線程鉤子

//SetWindowsHookEx( 2,KeyboardHookProcedure, IntPtr.Zero, GetCurrentThreadId()); //GetCurrentThreadId()為要監(jiān)視的線程ID,你完全可以自己寫(xiě)個(gè)方法獲取QQ的線程哦

//鍵盤(pán)全局鉤子,需要引用空間(using System.Reflection;)

//SetWindowsHookEx( 13,KeyboardHookProcedure,Marshal.GetHINSTANCE(Assembly.GetExecutingAssembly().GetModules()[0]),0);

//

//關(guān)于SetWindowsHookEx (int idHook, HookProc lpfn, IntPtr hInstance, int threadId)函數(shù)將鉤子加入到鉤子鏈表中，說(shuō)明一下四個(gè)參數(shù)：

//idHook 鉤子類(lèi)型，即確定鉤子監(jiān)聽(tīng)何種消息，上面的代碼中設(shè)為2，即監(jiān)聽(tīng)鍵盤(pán)消息并且是線程鉤子，如果是全局鉤子監(jiān)聽(tīng)鍵盤(pán)消息應(yīng)設(shè)為13，

//線程鉤子監(jiān)聽(tīng)鼠標(biāo)消息設(shè)為7，全局鉤子監(jiān)聽(tīng)鼠標(biāo)消息設(shè)為14。

//

//lpfn 鉤子子程的地址指針。如果dwThreadId參數(shù)為0 或是一個(gè)由別的進(jìn)程創(chuàng)建的線程的標(biāo)識(shí)，lpfn必須指向DLL中的鉤子子程。 除此以外，lpfn可

//以指向當(dāng)前進(jìn)程的一段鉤子子程代碼。鉤子函數(shù)的入口地址，當(dāng)鉤子鉤到任何消息后便調(diào)用這個(gè)函數(shù)。

//

//hInstance應(yīng)用程序?qū)嵗木浔?biāo)識(shí)包含lpfn所指的子程的DLL。如果threadId 標(biāo)識(shí)當(dāng)前進(jìn)程創(chuàng)建的一個(gè)線程，而且子程代碼位于當(dāng)前

//進(jìn)程，hInstance必須為NULL。可以很簡(jiǎn)單的設(shè)定其為本應(yīng)用程序的實(shí)例句柄。

//

//threadedId 與安裝的鉤子子程相關(guān)聯(lián)的線程的標(biāo)識(shí)符。如果為0，鉤子子程與所有的線程關(guān)聯(lián)，即為全局鉤子。

//************************************

// 如果設(shè)置鉤子失敗

if(hKeyboardHook == 0 )

{

HookStop();

throw new Exception("SetWindowsHookEx failed.");

}

}

}

// 卸載鉤子

public void HookStop()

{

bool retKeyboard = true;

if(hKeyboardHook != 0)

{

retKeyboard = UnhookWindowsHookEx(hKeyboardHook);

hKeyboardHook = 0;

}

if (!( retKeyboard))

throw new Exception("UnhookWindowsHookEx failed.");

}

vb 關(guān)于獲取輸入法的問(wèn)題

在上面的帖子里已經(jīng)解決了，主要是GetKeyboardLayout函數(shù)的參數(shù)指定為0的話(huà)，只能返回當(dāng)前線程中激活的輸入法區(qū)域標(biāo)識(shí)（Input Locale Identifier）。要返回系統(tǒng)活動(dòng)窗口的當(dāng)前輸入法，需要將該窗口的線程ID傳遞給GetKeyboardLayout函數(shù)，需要用到GetForegroundWindow和GetWindowThreadProcessID函數(shù)。詳見(jiàn)另一帖中的代碼。

怎樣用vb.net獲取輸入法的選字表？

這些文字存在于輸入法所占用的內(nèi)存段里。除非你HOOK輸入法。

本答案不確定。

vb.net 中怎么獲取輸入法輸入的內(nèi)容?

你不是C語(yǔ)言，這些不要你考慮啊。

當(dāng)你面對(duì) textbox控件時(shí)，等于你面對(duì)一個(gè)打開(kāi)的記事本啦，如果你想要在程序中獲取你輸入的內(nèi)容就： textbox控件名.Text

vb.net請(qǐng)教各位高手，誰(shuí)有用VB.NET寫(xiě)輸入法的實(shí)例?

輸入法編程是件很繁鎖的事情,

你可以在網(wǎng)上找找, 記得曾經(jīng)我進(jìn)入過(guò), [輸入法編程愛(ài)好者] 的一個(gè)論壇, 你找找看.

標(biāo)題名稱(chēng)：vb.net獲取輸入法 vb 輸入
文章分享：http://chinadenli.net/article40/hpgdho.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)頁(yè)設(shè)計(jì)公司、App開(kāi)發(fā)、云服務(wù)器、網(wǎng)站收錄、電子商務(wù)、虛擬主機(jī)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話(huà)：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)