Visual Basic - Escribir en Regedit boton y textbox

Hola programmers, tengo un problema con un script de visual basic 6, (es mi primer script, lo que quiero es insertar en el regedit de windows xp un nuevo valor dword, ya logre inserter en el registro dicho valor dword con su valos exadecimal que debe de ser pero el problema es que quiero que el valor hexadeicimal (o cuaqlquier otra cosa) de este dword sea algo que yo escriba en un textbox ¿como hago eso?

Les dejo mi script que llevo hasta ahora:

Private Sub Command1_Click()
Set reg = CreateObject("WScript.Shell")
reg.RegWrite "HKEY_CURRENT_USER\Prueba\Prueba "VALOR", "REG_DWORD"
MsgBox "Registro Insertado"
End Sub
_______________

Private Sub UrlText_Change()

End Sub

Es lo que llevo hasta el momento, el registro si se crea pero no puedo hacer que el VALOR sea lo que yo escriba en el textbox.

Por favor Ayudaaa, de antemano muchas gracias.

Buenas, Ciberdanny.

Para hacer lo que pides, simplemente debes sustituir el código del envento Click del Command1 del anterior código por este:

'---------------------
'CÓDIGO
'---------------------

Private Sub Command1_Click()
Dim vHex As String
vHex=CHex(
Set reg = CreateObject("WScript.Shell")
reg.RegWrite "HKEY_CURRENT_USER\Prueba\Prueba, txtValue.Text, "REG_DWORD"
MsgBox "Registro Insertado"
End Sub

'---------------------
'CÓDIGO
'---------------------

Aquí he tenido en cuenta que el TextBox donde escribías el valor se llamaba txtValue, aunque puedes modificar dicho nombre.
Simplemente he cambiado el argumento del Valor por una llamada a txtValue.Text, es decir, a la propiedad Text del txtValue (el texto que contiene la caja de texto).
Esto seria, en principio, una posible solución al problema.
Si necesitas algo más, coméntalo.
Hasta otra,

Zoto

podés hacerlo asi:
Dim reg As Object
Set reg = CreateObject("WScript.Shell")
reg.RegWrite "HKEY_CURRENT_USER\Prueba\Prueba\" & CInt(Text1.Text), "REG_DWORD"

Set reg = Nothing

Salu2

Hola, muchas gracias por sus respuestas, aunque sigo con el problema, yo creo que me esta fallando a mi algo, porque en cualquiera de las dos opciones me da el error 13 de "no coinciden tos tipos" ¿que es eso?.

Incluso en otras ocasiones me dice "se esperaba fin de la instruccion"


Pues cualquier opcion estare agradecido nuevamente.