日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

VB.NET中的窗體設(shè)計器可以支持可視化操作。我們下面就詳細(xì)介紹一下VB.NET鍵盤事件的獲取方式。在網(wǎng)上找了好多關(guān)于VB.NET鍵盤事件處理的資料，但是都沒有說清楚，或者是說的關(guān)于VB6.0的，自己琢磨了一下，終于成功了，很簡單的，拿出來總結(jié)一下，大家見笑！#t#

公司主營業(yè)務(wù)：成都網(wǎng)站制作、網(wǎng)站建設(shè)、移動網(wǎng)站開發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競爭能力。創(chuàng)新互聯(lián)建站是一支青春激揚、勤奮敬業(yè)、活力青春激揚、勤奮敬業(yè)、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化，感謝他們對我們的高要求，感謝他們從不同領(lǐng)域給我們帶來的挑戰(zhàn)，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。創(chuàng)新互聯(lián)建站推出托里免費做網(wǎng)站回饋大家。

1、VB.Net 2003下，在窗體設(shè)計起代碼中加入：MyBase.KeyPreview = True

1. #Region " Windows 窗體設(shè)計器生成的代碼 "   
2. Public Sub New()  
3. MyBase.New()  
4. '在此加入下面這句話，使在窗口中任何
   的按鍵都只執(zhí)行一個響應(yīng)  
5. MyBase.KeyPreview = True 
6. '該調(diào)用是 Windows 窗體設(shè)計器所必需的。  
7. InitializeComponent()  
8. '在 InitializeComponent() 
   調(diào)用之后添加任何初始化  
9. End Sub 

2、重載OnKeyPress

 
 
 

  
  
  
Protected Overrides Sub OnKeyPress()
Sub OnKeyPress()Sub OnKeyPress()Sub 
OnKeyPress(ByVal e As System.Windows.
Forms.KeyPressEventArgs)  
  
  
  
Dim key As String  
  
  
  
key = e.KeyChar  
  
  
  
'檢驗按鍵是否為回車鍵，如果是就把
焦點附給button1，并執(zhí)行Click命令  
  
  
  
If key = Microsoft.VisualBasic.
ChrW(13) Then  
  
  
  
button1.Focus()  
  
  
  
button1.PerformClick()  
  
  
  
End If  
  
  
  
End Sub 
 
 
 

Ok，VB.NET鍵盤事件的操作看起來很簡單，但是還是困擾了我好幾天，唉！編程序真是積累經(jīng)驗的過程！

網(wǎng)站標(biāo)題：VB.NET鍵盤事件相關(guān)內(nèi)容概覽
URL鏈接：http://m.5511xx.com/article/dhpcchs.html