利用VB.NET訪問注冊表
成都創新互聯公司服務項目包括三臺網站建設、三臺網站制作、三臺網頁制作以及三臺網絡營銷策劃等。多年來,我們專注于互聯網行業,利用自身積累的技術優勢、行業經驗、深度合作伙伴關系等,向廣大中小型企業、政府機構等提供互聯網行業的解決方案,三臺網站推廣取得了明顯的社會效益與經濟效益。目前,我們服務的客戶以成都為中心已經輻射到三臺省份的部分城市,未來相信會繼續擴大服務區域并繼續獲得客戶的支持與信任!
譯者注:訪問注冊表的例子比較多,然而通過VB.NET訪問注冊表的例子并不多,本文翻譯了一篇MSDN上的利用VB.NET存取注冊表的例子,挺詳細也挺全面的。
(
)
Cat
Francis
Visual
Studio
Team
Microsoft
Corporation
April
2002
摘要:這篇文章描述了利用VB.NET內置函數DeleteSetting,
GetAllSettings,
GetSetting
和
SaveSetting,以及通用語言運行時的兩個類Registry
和
RegistryKey來存取注冊表的實例,詳述了所需的權限,解釋了何時利用注冊表編輯器,并向你展示了如何利用程序從注冊表中動態的讀取數據及如何寫入數據。
引言
當用VB.NET進行編程時,你可能會選擇用VB.NET或.NET框架中的Registry類中的函數來訪問注冊表。雖然大多數情況下VB.NET的內置函數足夠用了,然而某些情況下你仍然需要.NET框架類來解決問題。
注冊表不僅存儲了本地機上一些程序的信息,還保存了操作系統的信息。操作注冊表可能會有危險。因此編程時必須謹慎的查看代碼,確保程序對所運行的機器上的安全不會構成威脅。
注冊表入口點包括兩部分:鍵名和鍵值。入口點是存儲在系統中的鍵和子鍵,類似于文件系統中的目錄和子目錄。
必備知識
要想讀懂本文需要有如下的必備知識:
1、熟悉上一個版本的Visual
Basic。
2、注冊表設計和利用的知識。
3、理解訪問注冊表的安全含義。
用VB.NET內置函數訪問注冊表
VB.NET提供了四個訪問注冊表的函數,為了使用它們,首先必須有讀寫權限。任何運行在全信任模式下的代碼都必須有訪問注冊表的必要的權限。可以查看RegistryPermission類從而
自己做個試驗就行了:
Public?Class?Form1
'?在窗體上放個?Label1
Private?Sub?Form1_KeyDown(ByVal?sender?As?Object,?ByVal?e?As?System.Windows.Forms.KeyEventArgs)?Handles?Me.KeyDown
Lable1.Text?=?"KeyCode=?"??e.KeyCode.ToString??vbCrLf
Lable1.Text?=?"KeyData=?"??e.KeyData.ToString??vbCrLf
Lable1.Text?=?"KeyValue=?"??e.KeyValue.ToString
End?Sub
End?Class
運行起來,自己按鍵盤試試就知道了。
左鍵是1
右鍵是2
中鍵是4
可以組合相加
左右同時就是3,也可以寫做:vbleftbutton+vbrightbutton
'先建立一個注冊表鍵;此列注冊表鍵名為TestKey。
My.Computer.Registry.CurrentUser.CreateSubKey("TestKey")
'定義注冊表鍵路徑,并賦值于注冊表鍵;此列路徑為HKEY_CURRENT_USER\TestKey,賦值為 "Test Value"
My.Computer.Registry.SetValue("HKEY_CURRENT_USER\TestKey", "TestValue", "This is a test value.")
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
分享題目:vb.net鍵鍵值 vb中數字鍵
標題URL:http://www.yijiale78.com/article24/hgcdje.html
成都網站建設公司_創新互聯,為您提供電子商務、云服務器、響應式網站、軟件開發、企業網站制作、自適應網站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯