ÊÖ»úÕ¾
ÍøÍ¨·ÖÕ¾
µçÐÅÖ÷Õ¾
ÃÜ¡¡Âë:
Óû§Ãû£º
µ±Ç°Î»Öà : Ö÷Ò³>ÍøÂç±à³Ì>Asp.Net±à³Ì>Áбí

VB.NET×¢²á±í±à³Ì

À´Ô´£º»¥ÁªÍø ×÷ÕߣºÎ÷²¿ÊýÂë ʱ¼ä£º2008-04-09
Î÷²¿ÊýÂë-È«¹úÐéÄâÖ÷»ú10Ç¿£¡40ÓàÏîÐéÄâÖ÷»ú¹ÜÀí¹¦ÄÜ,È«¹úÁìÏÈ!Ë«Ïß¶àÏßÐéÄâÖ÷»úÄϱ±·ÃÎʳ©Í¨ÎÞ×è!Ãâ·ÑÔùËÍÆóÒµÓʾÖ,.CNÓòÃû,×ÔÖú½¨Õ¾480ÔªÆð,Ãâ·ÑÊÔÓÃ7Ìì,ÂúÒâÔÙ¸¶¿î! P4Ö÷»ú×âÓÃ799Ôª/ÔÂ.Ô¸¶Ãâѹ½ð!
¡¡¡¡Ò»£®³ÌÐòÉè¼ÆºÍÔËÐеĻ·¾³ÉèÖãº

¡¡¡¡£¨1£©.ÊÓ´°2000·þÎñÆ÷°æ

¡¡¡¡£¨2£©. .Net FrameWork SDK Beta 2

¡¡¡¡¶þ£®³õ²½ÈÏʶע²á±í£º

¡¡¡¡Ê×ÏÈÎÒÃÇÀ´Á˽âÒ»ÏÂ×¢²á±íµÄ×é³É¡£ÔÚ×¢²á±íÖУ¬×ÓÊ÷ÊÇÖ÷Òª½Úµã£¬°üÀ¨½¡¡¢×Ó½¡ºÍÖµ¡£½¡¾ÍÊÇ´ò¿ª"×¢²á±í±à¼­Æ÷"ºó£¬³öÏÖÔÚ"×¢²á±í±à¼­Æ÷"×ó´°¸ñÖеÄÎļþ¼Ð£¬½¡¿ÉÒÔ°üº¬×Ó½¡ºÍÖµ½¡¡£×Ó½¡¾ÍÊǽ¡ÖеĽ¡£¬ÔÚ×¢²á±íÖУ¬×Ó½¡ÊôÓÚÊ÷ºÍ½¡¡£Öµ½¡¾ÍÊÇÔËÐÐ"×¢²á±í±à¼­Æ÷"ºó£¬³öÏÖÔÚ"×¢²á±í±à¼­Æ÷"ÓÒ´°¸ñÖеÄÊý¾Ý×Ö·û´®£¬Ëû¶¨ÒåÁ˵±Ç°ËùÑ¡½¡µÄÖµ£¬Öµ½¡ÓÉÈý¸ö²¿·Ö×é³É£ºÃû³Æ¡¢Êý¾ÝÀàÐͺÍÖµ±¾Éí¡£ÏÂͼ¾ÍÊÇ×¢²á±íµÄ¸÷¸ö×é³É²¿·Ö£º


¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡Í¼01£º×¢²á±í×é³Éͼ±í

¡¡¡¡Èý£®É趨²âÊÔ»·¾³£º

¡¡¡¡ÓÉÓÚ×¢²á±íÔÚÊÓ´°ÏµÍ³ÖеÄÌØÊâµØÎ»£¬ÎÒÃÇ×Ô¼º¶¨Ò弸¸ö×÷Ϊ³ÌÐòÊÔÑéʹÓá£ÔÚ×¢²á±í½¡"SYSTEM"ÏÂÃæ´´½¨Ò»¸ö×Ó½¡"A000"£¬ÔÚ´Ë×Ó½¡ÏÂÃæÔÙ´´½¨¶þ¸ö×Ó½¡"B000"ºÍ"B001"¡£ÔÚ×Ó½¡"B000"Öд´½¨Ò»¸ö½¡Ãû³ÆÎª"0001"£¬Êý¾ÝÀàÐÍΪ×Ö·û´®£¬ÖµÎª"1111"£»ÔÚ×Ó½¡"B001"ÖÐÒ²´´½¨Ò»¸ö½¡£¬Ãû³ÆÎª"0002"£¬Êý¾ÝÀàÐÍΪ×Ö·û´®£¬ÖµÎª"2222"¡£ÏÂͼ¾ÍÊÇÎÒÃÇΪ±¾ÎÄÖнéÉܵijÌÐòËùÉ趨µÄ×¢²á±í»·¾³£º


¡¡¡¡¡¡¡¡¡¡¡¡¡¡Í¼02£º±¾ÎÄÖнéÉܵijÌÐòʹÓõÄ×¢²á±í

¡¡¡¡ËÄ£®VB.NETÊÇÈçºÎ´´½¨×¢²á±íÐÅÏ¢£º

¡¡¡¡ÔÚ.Net FrameWork SDKÖж¨ÒåÁËÒ»¸öÃû³Æ¿Õ¼ä--Microsoft.Win32£¬Õâ¸öÃû³Æ¿Õ¼äÖзâ×°ÁËÓÃÓÚ²Ù×÷×¢²á±íµÄÐí¶àÀ࣬ÔÚ¾ßÌåµÄ³ÌÐòÉè¼ÆÖУ¬Ö÷ÒªÓõ½µÄÊÇ£ºRegistryÀà¡¢RegistryKeyÀà¡£ÆäÖÐRegistryÀàÖ÷ÒªÊÇÌṩΪ´æÈ¡ÖµºÍ×Ó½¡Ëù±ØÐëµÄ»ù±¾µÄ×ÓĿ¼Ê÷¡£ÔÚRegistryÀàÖж¨ÒåÁË×¢²á±íÖÐ7¸öÖ÷ÒªµÄ×ÓĿ¼Ê÷¡£Æä¶ÔÓ¦ÈçÏ£º

¡¡¡¡Registry.ClassesRoot ¶ÔÓ¦ÓÚHKEY_CLASSES_ROOT×ÓĿ¼Ê÷

¡¡¡¡Registry.CurrentUser ¶ÔÓ¦ÓÚHKEY_CURRENT_USER×ÓĿ¼Ê÷

¡¡¡¡Registry.LocalMachine ¶ÔÓ¦ÓÚ HKEY_LOCAL_MACHINE×ÓĿ¼Ê÷

¡¡¡¡Registry.User ¶ÔÓ¦ÓÚ HKEY_USER×ÓĿ¼Ê÷

¡¡¡¡Registry.CurrentConfig ¶ÔÓ¦ÓÚHEKY_CURRENT_CONFIG×ÓĿ¼Ê÷

¡¡¡¡Registry.DynDa ¶ÔÓ¦ÓÚHKEY_DYN_DATA×ÓĿ¼Ê÷

¡¡¡¡Registry.PerformanceData ¶ÔÓ¦ÓÚHKEY_PERFORMANCE_DATA×ÓĿ¼Ê÷

¡¡¡¡VB.NETÖ÷ÒªÊÇÀûÓÃRegistryKeyÀà·â×°µÄ·½·¨¡¢ÊôÐÔµÈÀ´½øÐÐÓë×¢²á±íÏà¹ØµÄ¸÷ÖÖ²Ù×÷¡£ÏÂÃæ¾ÍÀ´½éÉÜһϣ¬ÈçºÎÓÃVB.NET´´½¨×¢²á±íÐÅÏ¢¡£ÔÚ´´½¨×¢²áÐÅÏ¢£¬Ê×ÏȱØÐëÒªÖªµÀÈçºÎÈ·¶¨Òª´´½¨×¢²áÐÅÏ¢µÄµØ·½¡£Æ©Èç±¾ÎÄÎÒÃÇÊÇÒªÔÚ×Ó½¡"A000"ÏÂÃæÔÙ´´½¨Ò»¸ö×Ó½¡£¬ÄÇôÊ×ÏÈͨ¹ýÏÂÁÐÓï¾ä¾Í¿ÉÒÔʹµÃ×¢²á±íµÄ¼Ç¼ָÕëÖ¸Ïò"A000"£¬¾ßÌåÈçÏ£º

Dim hklm As RegistryKey = Registry.LocalMachine
Dim software11 As RegistryKey = hklm.OpenSubKey ( "SYSTEM" )
'´ò¿ª"SYSTEM"×Ó½¡
Dim software As RegistryKey = software11.OpenSubKey ( "A000" )
'´ò¿ª"A000"×Ó½¡

¡¡¡¡·½·¨"OpenSubKey"±»¶¨ÒåÔÚRegistryKeyÀàÖеģ¬´Ë·½·¨¿ÉÒÔ¿´³ÉÊÇÈ·¶¨×¢²á±í¼Ç¼µÄÖ¸Õë¡£´Ë·½·¨µÄµ÷ÓÃÖ÷ÒªÓжþÖÖ£¬Ò»ÖÖµ±´ò¿ªÖ¸¶¨µÄ×Ó½¡µÄÄ¿µÄÊÇΪÁ˶ÁÈ¡£¬ÄÇôµ÷Ó÷½·¨¿ÉÒÔ²ÉÓÃÉÏÃæÕâÖÖ·½Ê½£»Èç¹û´ò¿ªÖ¸¶¨×Ó½¡µÄÄ¿µÄÊÇΪÁ˽øÐÐд²Ù×÷£¬ÄÇôÔÚʹÓõÄʱºò±ØÐë²ÉÓÃÏÂÃæÓï·¨£º

OpenSubKey ( ×Ó½¡Ãû³Æ , true )
¡¡¡¡ÔÚRegistryKeyÀàÖж¨ÒåÁËCreateSubKey ( )À´´´½¨×Ó½¡£¬Í¨¹ýSetValue ( )·½·¨À´´´½¨½¡£¬²¢Îª´Ë½¡¸³Öµ¡£ÏÂÃæÓï¾ä¾ÍÊÇÔÚÒѾ­´ò¿ªµÄ×Ó½¡"A000"ÏÂÃæ´´½¨Ò»¸ö×Ó½¡²¢¸³Öµ£º

listBox1.Items.Clear ( )
Dim hklm As RegistryKey = Registry.LocalMachine
'´ò¿ª"SYSTEM"×Ó½¡
Dim software11 As RegistryKey = hklm.OpenSubKey ( "SYSTEM" ,true )
'´ò¿ª"A000"×Ó½¡
Dim software As RegistryKey = software11.OpenSubKey ( "A000" , true )
Dim ddd As RegistryKey = software.CreateSubKey ( "ddd" )
ddd.SetValue ( "www" , "1234" )
¡¡¡¡Ð޸Ľ¡Öµ¿ÉÒÔͨ¹ýSetValue ( )À´ÊµÏÖ£¬¾ßÌåµÄÓï·¨ÈçÏ£º

¡¡¡¡SetValue £¨´æÔڵĽ¡ £¬ÐµĽ¡Öµ£©

¡¡¡¡Î壮VB.NETÊÇ´´½¨²¢ÐÞ¸Ä×¢²á±íÐÅÏ¢µÄ³ÌÐò´úÂ루reg01.vb£©£º

¡¡¡¡ÖÁ´ËÎÒÃDz»Äѵõ½ÓÃVB.NET´´½¨²¢ÐÞ¸Ä×¢²á±íµÄ³ÌÐò´úÂ룬ÔÚÏÂÁдúÂëÖУ¬ÓÐÒ»µãҪ˵Ã÷£¬¾ÍÊÇÔÚ³ÌÐòÖÐʹÓÃÁËRegistryKeyÀàÖж¨ÒåÁíÍâ¶þ¸öÊôÐÔ£ºSubKeyCountºÍValueCount£¬ÆäÖеÚÒ»¸öÊôÐÔÊǵ±Ç°×Ó½¡ÏÂÃæÓжàÉÙ¸ö×Ó½¡£¬µÚ¶þ¸öÊǵ±Ç°×Ó½¡Öж¨ÒåÁ˶àÉÙ¸ö½¡¡£

Imports System
Imports System.Drawing
Imports System.ComponentModel
Imports System.Windows.Forms
Imports Microsoft.Win32
'µ¼Èë³ÌÐòÖÐʹÓõÄÃû³Æ¿Õ¼ä
Public Class Form1
Inherits Form
Public Sub New ( )
MyBase.New ( )
'³õʼ»¯´°ÌåÖеĸ÷¸ö×é¼þ
InitializeComponent ( )
End Sub
'Çå³ý³ÌÐòÖÐʹÓùýµÄ¸÷ÖÖ×ÊÔ´
Protected Overloads Overrides Sub Dispose ( ByVal disposing As Boolean )
If disposing Then
If Not ( components Is Nothing ) Then
components.Dispose ( )

ÎÄÕÂÕûÀí£ºÎ÷²¿ÊýÂë--רҵÌṩÓòÃû×¢²á¡¢ÐéÄâÖ÷»ú·þÎñ
http://www.west263.com
ÒÔÉÏÐÅÏ¢ÓëÎÄÕÂÕýÎÄÊDz»¿É·Ö¸îµÄÒ»²¿·Ö,Èç¹ûÄúÒª×ªÔØ±¾ÎÄÕÂ,Çë±£ÁôÒÔÉÏÐÅÏ¢£¬Ð»Ð»!