vb.net怎么設置快捷鍵

新建一個Form1把Form1的KeyPreview改成True

成都創新互聯十年專注成都高端網站建設定制開發服務,為客戶提供專業的成都網站制作,成都網頁設計,成都網站設計服務;成都創新互聯服務內容包含成都網站建設,微信小程序定制開發,軟件開發,網絡營銷推廣,網絡運營服務及企業形象設計;成都創新互聯擁有眾多專業的高端網站制作開發團隊,資深的高端網頁設計團隊及經驗豐富的架構師高端網站策劃團隊;我們始終堅持從客戶的角度出發,為客戶量身訂造網絡營銷方案，解決網絡營銷疑問。

拖入一個Button1到Form1上面

然后加入以下代碼

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

If e.KeyData = (Keys.Alt Or Keys.G) Then

Button1.PerformClick() '或者用Button1_Click(Nothing, New EventArgs)

'快捷鍵Alt+G觸發Button1_Click()事件。

End If

End Sub

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

Button1.Size = New Size(180, 23)

Button1.Text = "我被局部快捷鍵給召喚了~"

End Sub

VB.NET中的按鍵定義問題

Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click

if Me.TextBox1.Text = "信息" Then Me.TextBox1.Text ="社會" Else Me.TextBox1.Text = "信息"

Me.Button10.Text = "下一步"

End Sub

vb.net中textbox輸入完后如何直接按回車

思路很簡單:通過textbox的keypress事件來捕獲鍵盤輸入，輸入輸入的是回車鍵，則調用Button_click事件

代碼如下：

Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown

If e.KeyCode = 13 Then

call Button1_Click()

end if

End Sub

vb.net 獲取鍵盤輸入的字符

參考方法如下，具體解釋已經注解在代碼中；

/定義變量

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

static int hKeyboardHook = 0;

HookProc KeyboardHookProcedure;

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

* 聲明API函數

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

// 安裝鉤子 （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);

// 繼續下一個鉤子

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

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

// 取得當前線程編號（線程鉤子需要用到）

[DllImport("kernel32.dll")]

static extern int GetCurrentThreadId();

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

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

{

if (nCode = 0)

{

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

//線程鍵盤鉤子判斷是否按下鍵

Keys keyData = (Keys)wParam;

if(lParam.ToInt32() 0)

{

// 鍵盤按下

}

if(lParam.ToInt32() 0)

{

// 鍵盤抬起

}

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

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

//全局鍵盤鉤子判斷是否按下鍵

wParam = = 0x100 // 鍵盤按下

wParam = = 0x101 // 鍵盤抬起

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

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

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

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

}

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

}

//鍵盤結構

public struct KeyMSG

{

public int vkCode; //鍵值

public int scanCode;

public int flags;

public int time;

public int dwExtraInfo;

}

// 安裝鉤子

public void HookStart()

{

if(hKeyboardHook == 0)

{

// 創建HookProc實例

KeyboardHookProcedure = new HookProc(KeyboardHookProc);

// 設置線程鉤子

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

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

//鍵盤線程鉤子

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

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

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

//

//關于SetWindowsHookEx (int idHook, HookProc lpfn, IntPtr hInstance, int threadId)函數將鉤子加入到鉤子鏈表中，說明一下四個參數：

//idHook 鉤子類型，即確定鉤子監聽何種消息，上面的代碼中設為2，即監聽鍵盤消息并且是線程鉤子，如果是全局鉤子監聽鍵盤消息應設為13，

//線程鉤子監聽鼠標消息設為7，全局鉤子監聽鼠標消息設為14。

//

//lpfn 鉤子子程的地址指針。如果dwThreadId參數為0 或是一個由別的進程創建的線程的標識，lpfn必須指向DLL中的鉤子子程。 除此以外，lpfn可

//以指向當前進程的一段鉤子子程代碼。鉤子函數的入口地址，當鉤子鉤到任何消息后便調用這個函數。

//

//hInstance應用程序實例的句柄。標識包含lpfn所指的子程的DLL。如果threadId 標識當前進程創建的一個線程，而且子程代碼位于當前

//進程，hInstance必須為NULL。可以很簡單的設定其為本應用程序的實例句柄。

//

//threadedId 與安裝的鉤子子程相關聯的線程的標識符。如果為0，鉤子子程與所有的線程關聯，即為全局鉤子。

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

// 如果設置鉤子失敗

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.net輸入按鍵 vb文本框輸入文字
網站鏈接：http://vcdvsql.cn/article38/hehipp.html

成都網站建設公司_創新互聯，為您提供靜態網站、網站收錄、搜索引擎優化、網站策劃、用戶體驗、網站設計公司

廣告

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