Visual basic express 2010:Leer clave de registro de windows a ListBox

Para local machine
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim FontKey As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE")
        For Each SubKey As String In FontKey.GetSubKeyNames()
            ListBox1.Items.Add(SubKey)
        Next
        FontKey.Close()
    End Sub
End Class

Para current user
</pre>
Public Class Form1
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 Dim FontKey As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("software\")
 For Each SubKey As String In FontKey.GetSubKeyNames()
 ListBox1.Items.Add(SubKey)
 Next
 FontKey.Close()
 End Sub
End Class
<pre>

                    
                                

                                

                                




Tuitear
834 Veces leído 0 comentarios


                                        30 enero 2016 en
                                        Sin categoría