写了VB的应用程序，最后怎么关闭该程序呢

1VB的启动方式有两种

1

sub

main

2

form_load

结束也是两个方法，

sub

main

对应的执行到end

sub

就算结束

form_load就是Unload

me

当然全部结束的方法是END

但End

语句会重置所有模块级别变量和所有模块的静态局部变量。若要保留这些变量的值，改为使用

Stop

语句，则可以在保留这些变量值的基础上恢复执行。

注意

End

语句不调用

Unload、QueryUnload、或

Terminate

事件或任何其它

Visual

Basic

代码，只是生硬地终止代码执行。窗体和类模块中的

Unload、QueryUnload、和

Terminate

事件代码未被执行。类模块创建的对象被破坏，由

Open

语句打开的文件被关闭，并且释放程序所占用的内存。其它程序的对象引用无效。

End

语句提供了一种强迫中止程序的方法。Visual

Basic

程序正常结束应该卸载所有的窗体。只要没有其它程序引用该程序公共类模块创建的对象并无代码执行，程序将立即关闭。

使用强大的wmi对象，在窗体上添加一个CommandButton命令按钮控件，取名叫Command1，在其单击中加放以下代码。

完整代码：

Private Sub Command1_Click()

Dim objWMIService, objProcess, colProcess

Dim strComputer, strList

Dim strProcessName

strComputer = ""

strProcessName = "abcd"

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" _

& strComputer & "\root\cimv2")

Set colProcess = objWMIServiceExecQuery _

("Select from Win32_Process")

For Each objProcess In colProcess

If InStr(1, LCase(objProcessName), LCase(strProcessName)) <> 0 Then

objProcessTerminate

End If

Next

End Sub

以上就是关于写了VB的应用程序，最后怎么关闭该程序呢全部的内容，包括:写了VB的应用程序，最后怎么关闭该程序呢、VB怎样结束任务管理器的程序、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！