導航:首頁 > 編程語言 > vbnet程序不關閉

vbnet程序不關閉

發布時間:2023-12-18 09:33:01

Ⅰ VB.net如何設置程序運行時最先打開的窗體

你是不是用的Visual Studio來開發的?如果是,這樣操作:打開 項目 菜單 中的 XXX屬性,在彈出的屬性頁選擇最上面那個 應用程序 標簽,裡面有個啟動窗體,你選擇一下就可以了。
如果你不是用的visual Studio來開發的,那麼可以考慮把另外一個窗口的visible屬性先設置為false或者把你要顯示的窗口改為對話框的形式,大小比另外一個窗口大一點或者一樣(即 模態窗口,必須關閉才能繼續操作),這樣都可以實現你要的效果。

Ⅱ vb net只運行一個程序

方法一:通過Diagnostics.Process.GetProcessesByName函數來檢測程序是否已經啟動

Imports System.Windows.Forms

Mole Mole1
Sub Main()
'檢測多重弊碧啟動
If Diagnostics.Process.GetProcessesByName( _
Diagnostics.Process.GetCurrentProcess.ProcessName).Length > 1 Then
MessageBox.Show("已經一個實例的本程序正在運行。")
Return
End If
Application.Run(New Form())
End Sub
End Mole

不過這個方法有個缺點,如果用臘稿戶輪卜孝改了下exe的名字就檢測不到了,所以更好的方法如下

方法2:使用Mutex

Imports System.Windows.Forms

Mole Mole1
Sub Main()
Dim createdNew As Boolean
' 創建mutex
Dim mutex As System.Threading.Mutex = _
New System.Threading.Mutex(True, "YourAppName", createdNew)
If createdNew = False Then
MessageBox.Show("已經一個實例的本程序正在運行。")
Return
End If

Application.Run(New Form())

' 釋放mutex
mutex.ReleaseMutex()
End Sub
End Mole

Ⅲ vb.net做安裝包,安裝後自動運行程序

1 新建安裝部署項目

打開VS2005,點擊新建項目,選擇:其他項目類型->安裝與部署->安裝向導(安裝項目),然後點擊確定。

2 安裝向導

關閉後打開安裝向導,點擊下一步,或者直接點擊完成。

3 開始製作

安裝向導完成後即可進入項目文件夾:

雙擊"應用程序文件夾"在右邊的空白處右擊,選擇添加->文件,將你的做的應用程序的可執行文件和相應的類庫和組件添加進來。然後右擊你的文件,創建快捷方式,然後把快捷方式分別復制或剪切到左邊的"用戶的'程序'菜單"和"用戶桌面"中。這樣安裝程序安裝完成後會在 "開始->所有程序"和"桌面"上生成程序的快捷方式。也可以直接在"用戶的'程序'菜單"和"用戶桌面"相應目錄下新建快捷方式,然後定位到你的文件。

然後右擊左邊的"應用程序文件夾"打開屬性對話框:將屬性中的"DefaultLocation"的路徑中的"[Manufacturer]"去掉,不然的話做好的安裝程序默認安裝目錄會是"C:\Program Files\你的用戶名\安裝解決方案名稱";

然後打開解決方案管理器,右擊你的解決方案名稱,選擇屬性:打開的屬性頁中,選擇"系統必備", 在打開的系統必備頁中,在"指定系統必備安裝組件的位置"中選中如下選擇項:從與我的應用程序相同的位置下載系統必備組件。選上以後,在生成的安裝文件包中包含.NetFramework組件 。好了,這樣就完成99%了,然後點擊"生成->生成解決方案",生成成功!

我以前參考過的,希望對你有幫助。

http://hi..com/rivers811/blog/item/1fae4716820ced4c20a4e9ef.html

http://hi..com/xw010203/blog/item/90f66603b0f61e8fd43f7ca2.html

安裝完成後自動啟動程序

1.新建一個空的項目InstallCompenent,步驟為:解決方案->右鍵添加->新建項目->選擇"空項目"->輸入名稱"InstallCompenent"->確定,完成項目的添加.

2.在InstallCompenent項目中右鍵->添加->新建項->選擇安裝程序類->輸入名稱"Installer",完成installer類的添加.

修改代碼為:
/// <summary>
/// 功能是做安裝項目主項目輸出
/// 實現安裝過程中的一些操作
/// 如:安裝完成後啟動項目
/// </summary>
[RunInstaller(true)]
public partial class Installer : Installer
{
/// <summary>
/// 應用程序入口
/// </summary>
public static void Main()
{
}
/// <summary>
/// 構造函數
/// </summary>
public ECSuitsInstaller()
{
InitializeComponent();
}
/// <summary>
/// 重寫安裝完成後函數
/// 實現安裝完成後自動啟動已安裝的程序
/// </summary>
/// <param name="savedState"></param>
protected override void OnAfterInstall(IDictionary savedState)
{
base.OnAfterInstall(savedState);
Assembly asm = Assembly.GetExecutingAssembly();
string path = asm.Location.Remove(asm.Location.LastIndexOf("\\")) + "\\";
System.Diagnostics.Process.Start(path + "\\ECSuits.exe");
}
/// <summary>
/// 重寫安裝過程方法
/// </summary>
/// <param name="stateSaver"></param>
public override void Install(IDictionary stateSaver)
{
base.Install(stateSaver);
}
/// <summary>
/// 重寫安裝之前方法
/// </summary>
/// <param name="savedState"></param>
protected override void OnBeforeInstall(IDictionary savedState)
{
base.OnBeforeInstall(savedState);
}
/// <summary>
/// 重寫卸載方法
/// </summary>
/// <param name="savedState"></param>
public override void Uninstall(IDictionary savedState)
{
base.Uninstall(savedState);
}
/// <summary>
/// 重寫回滾方法
/// </summary>
/// <param name="savedState"></param>
public override void Rollback(IDictionary savedState)
{
base.Rollback(savedState);
}
}

3.在安裝項目中右鍵->添加項目輸出->選擇"項目"->InstallCompenent.

完成主輸出項目的添加.

4.打開自定義操作編輯器,在安裝->右鍵->添加自定義操作->選擇"應用程序文件夾"->選擇"主輸出來自InstallCompenent",完成添加.

閱讀全文

與vbnet程序不關閉相關的資料

熱點內容
javascript變數頁面 瀏覽:766
網路相冊淘寶 瀏覽:60
編程拉絲機怎麼樣 瀏覽:897
msdn不是最新版本 瀏覽:749
參加編程比賽學什麼編程好 瀏覽:349
把c盤的桌面文件移走了怎麼辦 瀏覽:949
2025第三代軍用北斗升級版 瀏覽:925
魅藍手勢密碼怎麼弄 瀏覽:509
蘋果store怎麼充值 瀏覽:224
note4應用程序許可設置在哪裡 瀏覽:489
路由器設置沒網路 瀏覽:539
微信無法載入視頻瀏覽器可以載入 瀏覽:419
linux配置環境 瀏覽:868
蘋果手機如何一頁只留幾個app 瀏覽:987
投標文件約定項包括哪些 瀏覽:920
如何學會人工智慧編程 瀏覽:889
手機qq傳的文件在哪 瀏覽:370
win10關閉數字證書 瀏覽:693
電腦字體放在哪個文件夾 瀏覽:27
開兩個相同版本cad 瀏覽:785

友情鏈接