將窗體KeyPreview屬性設(shè)置為True并對Form_KeyDown事件編程,可以獲取鍵盤箭頭鍵的鍵值。實現(xiàn)方法如下:
創(chuàng)新互聯(lián)公司是一家專注于成都做網(wǎng)站、網(wǎng)站建設(shè)與策劃設(shè)計,和碩網(wǎng)站建設(shè)哪家好?創(chuàng)新互聯(lián)公司做網(wǎng)站,專注于網(wǎng)站建設(shè)十載,網(wǎng)設(shè)計領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:和碩等地區(qū)。和碩做網(wǎng)站價格咨詢:13518219792
Option?Explicit
Private?Sub?Form_Load()
'允許窗體攔截鍵盤按鍵
Me.KeyPreview?=?True
End?Sub
Private?Sub?Form_KeyDown(KeyCode?As?Integer,?Shift?As?Integer)
'?KeyCode?鍵盤碼是鍵盤上每個按鍵的唯一編碼
'?在VB中,符號常數(shù)表示鍵盤碼,例如?vbKeyF1?表示F1鍵,
'?vbKeyHome?表示HOME鍵……?
Select?Case?KeyCode
Case?vbKeyLeft:?????Print?"左箭頭鍵值:"?+?CStr(KeyCode)
Case?vbKeyRight:????Print?"右箭頭鍵值:"?+?CStr(KeyCode)
Case?vbKeyUp:???????Print?"上箭頭鍵值:"?+?CStr(KeyCode)
Case?vbKeyDown:?????Print?"下箭頭鍵值:"?+?CStr(KeyCode)
End?Select
End?Sub
利用VB.NET訪問注冊表
譯者注:訪問注冊表的例子比較多,然而通過VB.NET訪問注冊表的例子并不多,本文翻譯了一篇MSDN上的利用VB.NET存取注冊表的例子,挺詳細也挺全面的。
(
)
Cat
Francis
Visual
Studio
Team
Microsoft
Corporation
April
2002
摘要:這篇文章描述了利用VB.NET內(nèi)置函數(shù)DeleteSetting,
GetAllSettings,
GetSetting
和
SaveSetting,以及通用語言運行時的兩個類Registry
和
RegistryKey來存取注冊表的實例,詳述了所需的權(quán)限,解釋了何時利用注冊表編輯器,并向你展示了如何利用程序從注冊表中動態(tài)的讀取數(shù)據(jù)及如何寫入數(shù)據(jù)。
引言
當(dāng)用VB.NET進行編程時,你可能會選擇用VB.NET或.NET框架中的Registry類中的函數(shù)來訪問注冊表。雖然大多數(shù)情況下VB.NET的內(nèi)置函數(shù)足夠用了,然而某些情況下你仍然需要.NET框架類來解決問題。
注冊表不僅存儲了本地機上一些程序的信息,還保存了操作系統(tǒng)的信息。操作注冊表可能會有危險。因此編程時必須謹慎的查看代碼,確保程序?qū)λ\行的機器上的安全不會構(gòu)成威脅。
注冊表入口點包括兩部分:鍵名和鍵值。入口點是存儲在系統(tǒng)中的鍵和子鍵,類似于文件系統(tǒng)中的目錄和子目錄。
必備知識
要想讀懂本文需要有如下的必備知識:
1、熟悉上一個版本的Visual
Basic。
2、注冊表設(shè)計和利用的知識。
3、理解訪問注冊表的安全含義。
用VB.NET內(nèi)置函數(shù)訪問注冊表
VB.NET提供了四個訪問注冊表的函數(shù),為了使用它們,首先必須有讀寫權(quán)限。任何運行在全信任模式下的代碼都必須有訪問注冊表的必要的權(quán)限??梢圆榭碦egistryPermission類從而
VB.NET 參考代碼:
Imports?Microsoft.Win32
Public?Class?Form1
Private?Sub?Button1_Click(sender?As?Object,?e?As?EventArgs)?Handles?Button1.Click
Dim?regKey?As?RegistryKey?=?Registry.LocalMachine.OpenSubKey("SYSTEM\CurrentControlSet\Control\Windows",?False)
For?Each?strSubKeyName?In?regKey.GetValueNames()
If?regKey.GetValueKind(strSubKeyName)?=?RegistryValueKind.String?Then
MessageBox.Show(regKey.GetValue(strSubKeyName))
'?regKey.SetValue(strSubKeyName,?"修改后的值")
End?If
Next
End?Sub
End?Class
首先將表讀取到DataSet
用DataGridView綁定數(shù)據(jù)源
在 datagridview中直接修改字段的值后,用
SqlDataAdapter的Update方法更新
DataSet即可!