Ler um valor de uma chave do registro no Visual Basic 6 ( VB6 ) é importante se o programa precisa de acesso a informações, como as configurações do programa , armazenados no Registro. A chave de informação " HKEY_CLASSES_ROOT " registro registro de classe COM lojas e também quais aplicativos devem abrir certas extensões de arquivos . Você pode utilizar o VB6 " RegOpenKeyEx " e funções " QueryValueEx " para ler os valores do registro do Windows . Instruções
1

Abra o arquivo de origem VB6 em um editor , como o Microsoft Visual Basic 6.
2

Adicione um procedimento que você pode usar para consultar um valor de registro , por adicionar o código :

Private Sub GetRegKeyValue ( sKeyName as String , sValueName as String)

Dim lRetVal as Long Dim

hKey as Long Dim

vValue As Variant

lRetVal = RegOpenKeyEx ( HKEY_CURRENT_USER, sKeyName , 0, KEY_QUERY_VALUE , hKey )

lRetVal = QueryValueEx ( hKey , sValueName , vValue )

MsgBox vValue

RegCloseKey ( hKey )

End Sub
3

consultar o valor do registro utilizando o método definido pela adição do código:

GetRegKeyValue " HKEY_CLASSES_ROOT \\ XML \\ CLSID "," (padrão) "

Isto irá abrir uma caixa de mensagem com o valor na chave fornecida . Se o valor não existir , o procedimento irá retornar com o código de erro " 2 - " ERROR_BADKEY ' . " Substituir " HKEY_CLASSES_ROOT \\ XML \\ CLSID " com a chave que você está procurando e substituir " (padrão) " com o valor que você deseja consultar .
4

Salve o arquivo fonte VB6, compilar e executar o programa para visualizar o valor da chave do registro.