|
|
VB دا توركۆرگۇچنىڭ باش بىتىنى ئۆزگەرتىش ئۇسۇلى:
كود مىسالى:
- Option Explicit
- Const REG_SZ As Long = 1
- Const HKEY_CURRENT_USER = &H80000001
- Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
- Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" _
- (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
- Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" _
- (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, _
- ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
- Private Sub Command1_Click()
- Dim hKey As Long
- RegCreateKey HKEY_CURRENT_USER, "Software\Microsoft\Internet Explorer\Main", hKey
- RegSetValueEx hKey, "Start Page", 0, REG_SZ, ByVal "/", 30
- RegCloseKey hKey
- End Sub
|
|
دېۋان تالىشىش
