Here you can do it in Visual Basic 6 (or VBA)
Download the registry editing code and place it in the class.
Then, to actually change the value, you can use the following code:
Dim reg As New RegistryClass With reg .SetKeyValue .HKEY_LOCAL_MACHINE, "SYSTEM\CurrentControlSet\Services\USBSTOR", .RegDWORD, "Start", 4 End With
source share