1,217
社区成员
发帖
与我相关
我的任务
分享为什么程序关掉之后,在系统的任务管理器里还是存在.
我的程序在关掉之后在系统的任务管理器里还是有程序存在,可能是程序设计哪里有问题,
请提示.
请提示.
...全文
请发表友善的回复…
发表回复
idoudoum 2004-09-14
- 打赏
- 举报
需要推出的时候请使用"END"结束程序
leolan 2004-09-14
- 打赏
- 举报
引用過的對象不再使用時注意及時釋放
tztz520 2004-09-14
- 打赏
- 举报
'这样吧.
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Private Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)
Private Sub Form_Unload(Cancel As Integer)
Dim ProcessID As Long
ProcessID = GetCurrentProcessId()
ExitProcess (ProcessID)
End Sub
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Private Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)
Private Sub Form_Unload(Cancel As Integer)
Dim ProcessID As Long
ProcessID = GetCurrentProcessId()
ExitProcess (ProcessID)
End Sub
ryuginka 2004-09-14
- 打赏
- 举报
在关闭值得同时
unload 窗体
set 窗体=nothing
unload 窗体
set 窗体=nothing
