那是不可能實現的,你寫了個.REG的文件只是用VB的一個控件來調用他,想不提示那除非你改WINDOW系統,不過我以前用過VC,在VC里面有幾個改注冊表的函數可以在編程里面實現,VB也有吧。你自己看看
創新互聯是一家集網站建設,阿巴嘎企業網站建設,阿巴嘎品牌網站建設,網站定制,阿巴嘎網站建設報價,網絡營銷,網絡優化,阿巴嘎網站推廣為一體的創新建站企業,幫助傳統企業提升企業形象加強企業競爭力。可充分滿足這一群體相比中小企業更為豐富、高端、多元的互聯網需求。同時我們時刻保持專業、時尚、前沿,時刻以成就客戶成長自我,堅持不斷學習、思考、沉淀、凈化自己,讓我們為更多的企業打造出實用型網站。
程序的兼容模式設置保存在注冊表下。
在 HKEY_CURRENT_USER/Software/Microsoft/Windows NT/CurrentVersion/AppCompatFlags/Layers/ 下新建一個鍵值,鍵值名稱是可執行程序文件的完全路徑,數據類型為reg_sz,數據數值為兼容的操作系統代碼。
代碼對照如下:
Windows NT 4.0 (Service Pack 5):NT4SP5
windows 95:WIN95
windows 98 or windows ME:WIN98
windows 2000:WIN2000
windows xp:WINXP
windows 2003:WIN2003
比如你要以WinXP的兼容模式運行 C:\1.exe,那么就是
HKEY_CURRENT_USER/Software/Microsoft/Windows NT/CurrentVersion/AppCompatFlags/Layers 在這下面新建一個鍵,名為"C:\starcraft.exe”,再在這個鍵下面創建一個reg_sz類型的數據,數據值為WINXP即可。
用VB.NET操作注冊表這個你可以百度到很多了。
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
var reg = /;SPLIT(?:(?!;SPLIT)[\s\S])*;SPLIT/g;
var str = "";
str.replace(reg,"");
本文題目:vb.net操作reg vb和net
網址分享:http://vcdvsql.cn/article40/doooieo.html
成都網站建設公司_創新互聯,為您提供網站改版、做網站、外貿建站、建站公司、外貿網站建設、小程序開發
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯