blocks|key|1603291|text|您可以使用以下代码将其添加到注册表中|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1603292|My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run",+True).SetValue(Application.ProductName,+Application.ExecutablePath)|code-block|syntax|javascript|1603293|您可以使用以下命令将其删除|1603294|My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run",+True).DeleteValue(Application.ProductName)|1603295|上面的代码会将其添加到所有用户。您可以在以下键中将其添加到当前用户中|1603296|HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run|1603297|或者，您可以在“启动”文件夹中添加一个指向您的应用程序的链接。|1603298|我建议你不要自动这样做，它可能会激怒用户。我讨厌应用程序自动将它们添加到Windows启动中。为用户提供在windows启动时运行该程序的选项。|1603299|entityMap^0|0|0|0|0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|U|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|V|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|W|8|@]|9|@]|A|$]]|$1|I|3|J|5|D|7|X|8|@]|9|@]|A|$E|F]]|$1|K|3|L|5|6|7|Y|8|@]|9|@]|A|$]]|$1|M|3|N|5|D|7|Z|8|@]|9|@]|A|$E|F]]|$1|O|3|P|5|6|7|10|8|@]|9|@]|A|$]]|$1|Q|3|R|5|6|7|11|8|@]|9|@]|A|$]]|$1|S|3|-4|5|6|7|12|8|@]|9|@]|A|$]]]|T|$]]

You can add it to registry with the following code

<pre><code>My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(Application.ProductName, Application.ExecutablePath)
</code></pre>

you can remove it using 

<pre><code>My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).DeleteValue(Application.ProductName)
</code></pre>

The above code will add it to all users. You can add it to current user in the following key

<pre><code>HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
</code></pre>

Or you can add a link to your application in the "Startup" folder.

I suggest you dont do it automatically it may irritate the user. I hate when apps add them automatically to Windows Startup. Give an option for the user to run the program on windows startup.

blocks|key|5493735|text|简单地使用以下代码：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|5493736|Dim+info+As+New+FileInfo(application.startuppath)
info.CopyTo(My.Computer.FileSystem.SpecialDirectories.Programs+%2B+"\startup\myapp.exe")|code-block|syntax|javascript|5493737|希望能有所帮助。|5493738|entityMap^0|0|0|0^^$0|@$1|2|3|4|5|6|7|K|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|L|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|M|8|@]|9|@]|A|$]]|$1|I|3|-4|5|6|7|N|8|@]|9|@]|A|$]]]|J|$]]

Simpley use this code:

<pre><code>Dim info As New FileInfo(application.startuppath)
info.CopyTo(My.Computer.FileSystem.SpecialDirectories.Programs + "\startup\myapp.exe")
</code></pre>

hope it helps.

blocks|key|5493757|text|您可以使用以下代码完成此操作|type|unstyled|depth|inlineStyleRanges|entityRanges|data|5493758|++++Private+Sub+Form1_Load(ByVal+sender+As+System.Object,+ByVal+e+As+System.EventArgs)+Handles+MyBase.Load

++++'+This+is+where+you'll+need+to+have+the+program
++++'+set+the+check+box+to+the+previous+selection+that
++++'+the+user+has+set.+It's+up+to+you+how+you+do+this.
++++'+For+now,+I'll+set+it+as+"unchecked".

++++CheckBox1.Checked+=+False

++End+Sub

++Private+Sub+Button1_Click(ByVal+sender+As+System.Object,+ByVal+e+As+System.EventArgs)+Handles+Button1.Click

++++'+The+following+code+is+a+rendition+of+one+provided+by
++++'+Firestarter_75,+so+he+gets+the+credit+here:

++++Dim+applicationName+As+String+=+Application.ProductName
++++Dim+applicationPath+As+String+=+Application.ExecutablePath

++++If+CheckBox1.Checked+Then
++++++Dim+regKey+As+Microsoft.Win32.RegistryKey
++++++regKey+=+Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run",+True)
++++++regKey.SetValue(applicationName,+""""+&+applicationPath+&+"""")
++++++regKey.Close()
++++Else
++++++Dim+regKey+As+Microsoft.Win32.RegistryKey
++++++regKey+=+Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run",+True)
++++++regKey.DeleteValue(applicationName,+False)
++++++regKey.Close()
++++End+If

++++'+Assuming+that+you'll+run+this+as+a+setup+form+of+some+sort
++++'+and+call+it+using+.ShowDialog,+simply+close+this+form+to
++++'+return+to+the+main+program
++++Close()
++++End+Sub|code-block|syntax|javascript|5493759|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|I|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|J|8|@]|9|@]|A|$E|F]]|$1|G|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|H|$]]

You Can Do this Using the code below

<pre><code> Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

 ' This is where you'll need to have the program
 ' set the check box to the previous selection that
 ' the user has set. It's up to you how you do this.
 ' For now, I'll set it as "unchecked".

 CheckBox1.Checked = False

 End Sub

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 ' The following code is a rendition of one provided by
 ' Firestarter_75, so he gets the credit here:

 Dim applicationName As String = Application.ProductName
 Dim applicationPath As String = Application.ExecutablePath

 If CheckBox1.Checked Then
 Dim regKey As Microsoft.Win32.RegistryKey
 regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
 regKey.SetValue(applicationName, """" &amp; applicationPath &amp; """")
 regKey.Close()
 Else
 Dim regKey As Microsoft.Win32.RegistryKey
 regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
 regKey.DeleteValue(applicationName, False)
 regKey.Close()
 End If

 ' Assuming that you'll run this as a setup form of some sort
 ' and call it using .ShowDialog, simply close this form to
 ' return to the main program
 Close()
 End Sub
</code></pre>

blocks|key|5493784|text|一个简单的方法|type|unstyled|depth|inlineStyleRanges|entityRanges|data|5493785|Imports+Microsoft.Win32

...

Dim+regKey+As+RegistryKey
regKey+=+Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run",True)
regKey.SetValue(Application.ProductName,+Application.ExecutablePath)
regKey.Close()|code-block|syntax|javascript|5493786|希望能有所帮助|5493787|entityMap^0|0|0|0^^$0|@$1|2|3|4|5|6|7|K|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|L|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|M|8|@]|9|@]|A|$]]|$1|I|3|-4|5|6|7|N|8|@]|9|@]|A|$]]]|J|$]]

A simple method

<pre><code>Imports Microsoft.Win32

...

Dim regKey As RegistryKey
regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run",True)
regKey.SetValue(Application.ProductName, Application.ExecutablePath)
regKey.Close()
</code></pre>

Hope it helps

blocks|key|5493841|text|只需尝试以下代码：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|5493842|FileCopy("Name.Ext",+Environment.GetFolderPath(Environment.SpecialFolder.Startup)+&+"\Name.Ext")|code-block|syntax|javascript|5493843|这里(Name.Ext)+:-|5493844|Name+-+Your+Application's+name.+Ext+-+The+Extension,+it's+of-course+.exe|offset|length|style|CODE|5493845|这是最简单也是最好用的。|5493846|entityMap^0|0|0|0|0|20|0|0^^$0|@$1|2|3|4|5|6|7|S|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|T|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|U|8|@]|9|@]|A|$]]|$1|I|3|J|5|6|7|V|8|@$K|W|L|X|M|N]]|9|@]|A|$]]|$1|O|3|P|5|6|7|Y|8|@]|9|@]|A|$]]|$1|Q|3|-4|5|6|7|Z|8|@]|9|@]|A|$]]]|R|$]]

Just try this code :-

<pre><code>FileCopy("Name.Ext", Environment.GetFolderPath(Environment.SpecialFolder.Startup) &amp; "\Name.Ext")
</code></pre>

Here (Name.Ext) :-

<code>Name - Your Application's name.
Ext - The Extension, it's of-course .exe</code>

It's the simplest and best to use.

blocks|key|4075704|text|Imports+Microsoft.Win32

...

Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run",+Application.ProductName,+Application.ExecutablePath,+RegistryValueKind.String)|type|code-block|depth|inlineStyleRanges|entityRanges|data|syntax|javascript|4075705|unstyled|entityMap^0|0^^$0|@$1|2|3|4|5|6|7|G|8|@]|9|@]|A|$B|C]]|$1|D|3|-4|5|E|7|H|8|@]|9|@]|A|$]]]|F|$]]

<pre><code>Imports Microsoft.Win32

...

Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run", Application.ProductName, Application.ExecutablePath, RegistryValueKind.String)
</code></pre>

blocks|key|5493905|text|这可能是一个老话题，但是添加Imports+System.Security.AccessControl.RegistryRights应该会解决System.Security.SecurityException：‘请求的注册表访问是不允许的。’克里斯托弗·纳塔利乌斯所说的麻烦|type|unstyled|depth|inlineStyleRanges|entityRanges|data|5493906|entityMap^0|0^^$0|@$1|2|3|4|5|6|7|D|8|@]|9|@]|A|$]]|$1|B|3|-4|5|6|7|E|8|@]|9|@]|A|$]]]|C|$]]

Might be old topic but adding
Imports System.Security.AccessControl.RegistryRights
Should resolve System.Security.SecurityException: 'Requested registry access is not allowed.' trouble stated by Christhofer Natalius

I'm programming a desktop application similar to Google desktop but with my own gadget with vb.net 2008 how can i make my application when the user install it on their computer to run at the time of start up? 

Let assume that my application name is windowsAplication1 and I'm using windows XP and the program will be installed on C drive?

How to make my program run at startup?

翻译质量差，导致语言生硬或混乱。

没有提供实际的解决方法或示例。

解答不清晰，无法理解或解决问题。

页面排版不美观，阅读体验差。

文章

问答

视频

学习中心

腾讯云实验室

直播

竞赛

腾讯云代码分析专区

腾讯iOA零信任安全管理系统专区

腾讯云架构师技术同盟交流圈

腾讯云数据库专区

腾讯云顾问专区

腾讯云原生专区

腾讯混元专区

腾讯云TCE专区

腾讯云Lighthouse专区

腾讯云HAI专区

腾讯云Edgeone专区

腾讯云存储专区

腾讯云智能专区

腾讯轻联专区 

腾讯云开发专区

TAPD专区

腾讯轻量云游戏服专区

腾讯云最具价值专家

腾讯云架构师技术同盟

腾讯云创作之星

腾讯云开发者先锋

腾讯云代码助手

云原生构建

TAPD 敏捷项目管理

Cloud Studio

SDK中心

API中心

命令行工具

涵盖代码开发、场景应用、自动测试全流程，助你从零构建专属AI助手

一站式MCP教程库，解锁AI应用新玩法

我正在编写一个类似于谷歌桌面的桌面应用程序，但使用我自己的vb.net 2008小工具，当用户将其安装到他们的计算机上以在启动时运行时，我如何才能使我的应用程序运行？假设我的应用程序名为windowsAplication1，并且我使用的是windows XP，并且该程序将安装在C盘上？

问如何让我的程序在启动时运行？
EN

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问如何让我的程序在启动时运行？EN