レジストリ キーを編集し、データ値を「4」に設定する必要があります
コマンドプロンプトからそれを行う方法は知っていますが、それを行うための Visual Basic コードを見つけようとしています。
それが役立つ場合、これが鍵です:
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\USBSTOR\Start
Visual Basic 6(またはVBA)でそれを行う方法は次のとおりです。
このレジストリ編集コードをダウンロードして、クラスに入れます。
次に、次のようなコードを使用して、実際に値を変更できます。
Dim reg As New RegistryClass
With reg
.SetKeyValue .HKEY_LOCAL_MACHINE, "SYSTEM\CurrentControlSet\Services\USBSTOR", .RegDWORD, "Start", 4
End With