- Yasaklandı
- #1
Hile kullanmak kolsuzluk değil akıllılıktır
Banlı Üye
hala formun ölü bölgesini yeşillendirmeye çalışıyorum
ilk önce en üst kısma bunu yazalım
Reg kullanımı:
Dim kayit as RegistryKey
Dim anahtar As String = "regkey"
kayit = Registry.LocalMachine.OpenSubKey (anahtar, True)
If anahtar Is Nothing Then
Msgbox "Anahtar Bulunamadı"
End If
'Oluşturma ve açma
kayit = Registry.LocalMachine.CreateSubKey (anahtar)
kayit = Registry.LocalMachine.OpenSubKey (anahtar, True)
'Yazmak için
kayit.SetValue ("Serial", "123456")
'Değerini okumak için
'burda msgbox yerine başka şeyler kullanabilirsiniz
Msgbox ("Alt Anahtarın değeri = " & kayit.GetValue("Serial").ToString )
'Silmek için
kayit.DeleteSubKey ("Serial")
*alıntıdır
ilk önce en üst kısma bunu yazalım
Imports Microsoft.Win32Reg kullanımı:
Dim kayit as RegistryKey
Dim anahtar As String = "regkey"
kayit = Registry.LocalMachine.OpenSubKey (anahtar, True)
If anahtar Is Nothing Then
Msgbox "Anahtar Bulunamadı"
End If
'Oluşturma ve açma
kayit = Registry.LocalMachine.CreateSubKey (anahtar)
kayit = Registry.LocalMachine.OpenSubKey (anahtar, True)
'Yazmak için
kayit.SetValue ("Serial", "123456")
'Değerini okumak için
'burda msgbox yerine başka şeyler kullanabilirsiniz
Msgbox ("Alt Anahtarın değeri = " & kayit.GetValue("Serial").ToString )
'Silmek için
kayit.DeleteSubKey ("Serial")
*alıntıdır