Read/Update Registry

I want to check this registry key:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable

It should be a 1 or a 0 - how do I update it if the setting needs to be changed to a 1 or 0?(depending on its current setting)?

Thanks

k - got it

Dim WshShell As Object
Set WshShell = CreateObject("WScript.Shell")

str = WshShell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable")