'在启动窗体的form_load事件中加入如下代码:
If App.PrevInstance = True Then
MsgBox "您已经运行了该程序! ----谢谢!"
Exit Sub
End If
If App.PrevInstance = True Then
MsgBox "您已经运行了该程序! ----谢谢!"
Exit Sub
End If
解决方案 »
- VB 怎样控制输入法输出字符
- vb连接Oracle错误
- VB中MSComm为什么收到的数据比利用串口工具看到的数据随机性的少一段呢?
- ?在线等待,如何获得一个文件的 大小 信息!
- 如何进行最简单的文件操作?
- 关于datagrid的AllowAddNew、AllowDelete、AllowUpdate属性的使用方法!(在线等待谢谢)
- 文件内容排序问题
- directdraw的表面为什么老在前面,弹出窗体无法显示
- 大天才小仙妹遇到难题了,acptvb(微软全球技术中心)救命啊!
- 帮帮忙看看这个存储过程怎么不能执行呢?
- 关于window.open的vbscript的提问?
- 制作安装软件的问题 ,谁解决,我放1000分
Sub Main()
If App.PrevInstance Then
MsgBox "程序已经运行..."
End
End If
End Sub