以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  程序重复打开请教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52306)

--  作者:hbhb
--  发布时间:2014/6/12 22:23:00
--  程序重复打开请教
请问如何禁止程序重复打开?
--  作者:有点甜
--  发布时间:2014/6/12 22:25:00
--  
 

可以用下面代码实现

全局代码:

Public mu As System.Threading.Mutex

 

BeforeOpenProject事件:

Dim sucess As Boolean = False
mu = new System.Threading.Mutex(True, "dsdfhdfghf", sucess)
If not sucess Then
    MessageBox.Show("只能打开一次!")
    e.Cancel = True
End If


--  作者:hbhb
--  发布时间:2014/6/12 22:39:00
--  
谢谢!帮助里在哪里介绍,怎么看不懂?
--  作者:有点甜
--  发布时间:2014/6/12 22:40:00
--  
以下是引用hbhb在2014-6-12 22:39:00的发言:
谢谢!帮助里在哪里介绍,怎么看不懂?

 

用就行了,在两个地方加入代码即可。


--  作者:hbhb
--  发布时间:2014/6/12 22:48:00
--  
如此重要的知识点为何帮助里不介绍,难道非要回头精通vb.net?
如果不进行重复打开限制,程序运行有无影响?

--  作者:有点甜
--  发布时间:2014/6/12 22:49:00
--  
以下是引用hbhb在2014-6-12 22:48:00的发言:
如此重要的知识点为何帮助里不介绍,难道非要回头精通vb.net?
如果不进行重复打开限制,程序运行有无影响?

 

驱动学习,需要的时候,就去网上查一下对应的资料即可。


--  作者:hbhb
--  发布时间:2014/6/12 22:52:00
--  
那我拜您为师可以吗?省的我万里长征。
--  作者:kylin
--  发布时间:2014/6/13 15:36:00
--  
以下是引用有点甜在2014-6-12 22:25:00的发言:
 

可以用下面代码实现

全局代码:

Public mu As System.Threading.Mutex

 

BeforeOpenProject事件:

Dim sucess As Boolean = False
mu = new System.Threading.Mutex(True, "dsdfhdfghf", sucess)
If not sucess Then
    MessageBox.Show("只能打开一次!")
    e.Cancel = True
End If

图片点击可在新窗口打开查看


--  作者:zpx_2012
--  发布时间:2014/6/19 11:47:00
--  
请教下这样会有个问题,当程序已经运行最小化在下方任务栏后再次运行是可以出现提示,但也被最小化在下面了,能否让提示窗口直接显示在桌面上呢?谢谢!
--  作者:有点甜
--  发布时间:2014/6/19 11:53:00
--  
以下是引用zpx_2012在2014-6-19 11:47:00的发言:
请教下这样会有个问题,当程序已经运行最小化在下方任务栏后再次运行是可以出现提示,但也被最小化在下面了,能否让提示窗口直接显示在桌面上呢?谢谢!

 

MessageBox.Show("anbc", "123",MessageBoxButtons.Ok,MessageBoxIcon.Warning,0, Windows.forms.MessageBoxOptions.ServiceNotification)