http://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 SubFunction PrevInstance() As Boolean If UBound(Diagnostics.Process.GetProcessesByname _ (Diagnostics.Process.GetCurrentProcess.Processname)) _ > 0 Then Return True Else Return False End IfEnd Function总结
以上是内存溢出为你收集整理的vb6 – 如何将VB 6.0中的Application.PrevInstance转换为VB.NET?全部内容,希望文章能够帮你解决vb6 – 如何将VB 6.0中的Application.PrevInstance转换为VB.NET?所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)