如何防止重複執行程式

原文位置：
http://forums.microsoft.com/msdn-cht/ShowPost.aspx?PostID=1835300&SiteID=14

Question：
我的環境是: WinXP pro + Office XP + VS.net 2005

我的程式有設定為單一執行個體，我希望如果使用者連續執行程式兩次時，只在第一次執行時出現Msgbox("Start Running")，我將下面的程式加入MDI母表單中

Public Sub Me_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles
Me.Startup      
   MsgBox("Start Running")          
End Sub
   
Public Event Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs)

可是執行時並沒有作用，請問我要如何才能做到這樣的功能？？

Answer：

您可以在Form_Load加入您想要加入的訊息就可以了；
另外補充一下，如果您在專案屬性中把"建立單一執行個體選項"勾選的話，執行第二次的時候會自動將焦點轉移到第一次執行的程式；如果不用這個方式去做的話，下面有另外一個方式可以參考看看


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
''防止重複執行
If PrevInstance() Then
MessageBox.Show("程式執行中")
Application.Exit()
Exit Sub
End If
MessageBox.Show("Load")
End Sub

Public Function PrevInstance() As Boolean
If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then
Return True
Else
Return False
End If
End Function

留言

張貼留言

這個網誌中的熱門文章

開啟cshtml檔案時，出現『並未將物件參考設定為物件執行個體』的錯誤訊息

筆者的開發環境為VS2015企業版加上Win10，身為更新控，每次有任何更新(擴充套件等)，都會立馬進行更新的動作；平常也不常寫ASP.Net MVC相關的東東；今天開啟一個專案，想要凱起view(xxxx.cshtml)來查看時，居然出現『並未將物件參考設定為物件執行個體』的錯誤，所有的view都不能看。一想到如果要重灌VS的話，整個背後就開始冷汗直流.. 幸好，找了一下相關資料，在這一篇的討論中有提到相關的狀況 Visual Studio doesn't open cshtml files #276 筆者先測試的方式是刪除ComponentModelCache這個資料夾，節錄原文如下 『Delete the content of %LocalAppData%\Microsoft\VisualStudio\14.0\ComponentModelCache』 之後重新啟動VS之後，就可以開啟cshtml的檔案了，筆記一下以免日後遇到類似的狀況，有google真好 Orz
閱讀完整內容

無法設定中斷點 尚未載入符號檔

圖片
有時候也不知道怎麼搞得，程式(專案)copy來copy去，突然有天設定中斷點之後開始偵錯....噹噹..尚未載入符號檔，中斷點過站不停...平常又很依賴中斷點來偵錯，這下真的是慌了手腳；當下只能用messagebox.show來一步一步看到底是錯在什麼地方.. 今天靜下心來查了一些資料，測試之後真的有效，原來把專案的組態設成了Release，改成Debug之後就可以正常設定中斷點了；現在那台電腦不在手上改天改回Release之後來測試看看是不是會一樣的狀況；下面有些資料可以參考 沒有符號資訊對話方塊 有一點要特別注意，一般使用VB的開發設定時"方案"中如果只有單一專案的話會看不到要怎麼去設定組態，這時候請依照這篇文章的說明" HOW TO：在套用 Visual Basic 開發者設定的情況下管理組建組態 來設定，設定完之後在專案的屬性裡面就可以看的到了，如下圖 如果方案中有多個專案，那麼在方案的屬性中直接就可以看到設定的地方，如下圖
閱讀完整內容

DataGridView欄位計算總合

在 關於DataGridView的問題 這篇問題中，有網友提到了DataGridView總和的部分要如何去做，chhuang大有回覆了一篇，真是太神了，節錄問題與解決方式如下 問題 我想要計算DetailDataGridView金額的總計 還有就是以蛋糕為例 5*30=150 計算好填回金額內 然後總計的270元 我要寫入另外的textbox內 例如： 商品 數量 單價 金額 -------------------------------------------------- 牛奶 1 20 20 咖啡 2 50 100 蛋糕 5 30 150 總計 270 元 使用VB2005 解答 private void Form1_Load(object sender, EventArgs e) { DataTable dt = new DataTable(); dt.Columns.Add("C1", typeof (string)); dt.Columns.Add("C2", typeof (int)); dt.Columns.Add("C3", typeof (int)); dt.Columns.Add("C4", typeof(int)); dt.Columns["C4"].Expression = "C2 * C3"; dt.Rows.Add("牛奶", 1, 20); dt.Rows.Add("咖啡", 2, 50); dt.Rows.Add("蛋糕", 5, 30); dataGridView1.DataSource = dt; textBox1.Text = dt.Compute("Sum(C4)", null).ToString(); } 相關參考 DataTable.Compute 方法 DataColumn.Expr
閱讀完整內容