VB.NET中如何实现VB 6.0的Application.PrevInstance功能？
- 内容介绍
- 文章标签
- 相关推荐
本文共计153个文字，预计阅读时间需要1分钟。
在VB6代码中，我使用了`Applications.PrevInstance`，升级到.NET后这部分代码失效。有人能提供升级的解决方案或想法吗？+TIA+查看这里：http://www.knowdotnet.com/articles/previnstance.
我在VB 6代码中有’Applications.PrevInstance’,我试图使用VS 2008升级到.NET.显然这段代码不再有效.有没有人对升级解决方案有任何想法？ TIA 看这里：www.knowdotnet.com/articles/previnstance.html
Public Sub Main() If PrevInstance() Then Exit Sub ' continue with your application UserName = Environ("UserName") ComputerName = Environ("COMPUTERNAME") End Sub Function PrevInstance() As Boolean If UBound(Diagnostics.Process.GetProcessesByName _ (Diagnostics.Process.GetCurrentProcess.ProcessName)) _ > 0 Then Return True Else Return False End If End Function
本文共计153个文字，预计阅读时间需要1分钟。
在VB6代码中，我使用了`Applications.PrevInstance`，升级到.NET后这部分代码失效。有人能提供升级的解决方案或想法吗？+TIA+查看这里：http://www.knowdotnet.com/articles/previnstance.
我在VB 6代码中有’Applications.PrevInstance’,我试图使用VS 2008升级到.NET.显然这段代码不再有效.有没有人对升级解决方案有任何想法？ TIA 看这里：www.knowdotnet.com/articles/previnstance.html
Public Sub Main() If PrevInstance() Then Exit Sub ' continue with your application UserName = Environ("UserName") ComputerName = Environ("COMPUTERNAME") End Sub Function PrevInstance() As Boolean If UBound(Diagnostics.Process.GetProcessesByName _ (Diagnostics.Process.GetCurrentProcess.ProcessName)) _ > 0 Then Return True Else Return False End If End Function