-1

これを行うためにインターネットからコードを検索して使用しましたが、完了しませんでした。このコードを使用しています

Dim appstartup_path As String = Path.GetDirectoryName(Application.StartupPath)
    Dim regKey As Microsoft.Win32.RegistryKey
    regKey = Registry.LocalMachine.OpenSubKey("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)

    If CheckBox2.Checked = True Then

        regKey.SetValue("my_app", "app_path")
        regKey.Close()

    Else

        regKey.DeleteValue("my_app", False)

    End If

しかし、オブジェクト参照の取得エラーが設定されていません...! これは正しい方法ですか?

または他に解決策は何ですか

タナクス....!

4

1 に答える 1

0

私は今これをテストすることはできませんが、私にはその行が

regKey = Registry.LocalMachine.OpenSubKey("HKEY_LOCAL_MACHINE\SOFTWARE\...

冗長なHKEY_LOCAL_MACHINEエントリが含まれています。Registry.LocalMachineすでにHKEY_LOCAL_MACHINEフォルダを表しています。選択するサブフォルダーには、それを含めないでください。

regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft...

動作するはずです。

于 2013-03-19T07:35:03.287 に答える