锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net退出过程 vb退出窗体的代码

IT技术进程

vb.net 怎么结束进程好像不难吧？
vb.net退出过程我放进vb.net退出过程了Button1的Click事件里 。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
On Error GoTo Errmessages'在做系统操作时加排错标签是个好习惯
Dim TargetName As String = "ibmdict" '存储进程名为文本型 ， 注：进程名不加扩展名
Dim TargetKill() As Process = Process.GetProcessesByName(TargetName) '从进程名获取进程
Dim TargetPath As String'存储进程路径为文本型
If TargetKill.Length1 Then'判断进程名的数量，如果同名进程数量在2个以上，用For循环关闭进程 。
For i = 0 To TargetKill.Length - 1
TargetPath = TargetKill(i).MainModule.FileName
TargetKill(i).Kill()
Next
ElseIf TargetKill.Length = 0 Then'判断进程名的数量，没有发现进程直接弹窗 。不需要的 ， 可直接删掉该If子句
MsgBox("没有发现进程！")
Exit Sub
ElseIf TargetKill.Length = 1 Then'判断进程名的数量，如果只有一个 ， 就不用For循环
TargetKill(0).Kill()
End If
MsgBox("已终止"TargetKill.Length"个进程") '弹窗提示已终止多少个进程
Errmessages:‘定义排错标签
If Err.DescriptionNothing Then’判断有无错误，如果有，则 ↓
MsgBox(Err.Description) '当出现错误时，弹窗提示
End If
End Sub
可根据需要自行修改，这个备注够完善了吧？不会的再Hi我 。
详细阐述 vb.net 中main每个 Visual Basic 应用程序均必须包含一个称为VB.NET Main过程 。该过程为应用程序的起始点并为应用程序提供总体控制 。.NET Framework 在已加载应用程序并准备将控制传递给它时，将调用 Main 过程 。除非您要创建 Windows 窗体应用程序 ， 否则就必须为自运行的应用程序编写 Main 过程 。
Main 中包含首先运行的代码 。在 Main 中，可以确定在程序启动时首先加载的窗体，确定系统上是否已在运行您的应用程序副本，为应用程序建立一组变量，或者打开应用程序需要的数据库 。
VB.NET Main过程的要求
独立运行的文件（扩展名通常为 .exe）必须包含 Main 过程 。库（例如 ， 扩展名为 .dll）不独立运行，因而不需要 Main 过程 。可以创建的不同类型的项目的要求如下：
控制台应用程序可以独立运行，而且您必须提供至少一个 Main 过程 。
Windows 窗体应用程序可以独立运行 。但是，Visual Basic 编译器会在此类应用程序中自动生成一个 Main 过程，因而您不需要编写此过程 。
类库不需要 Main 过程 。这些类库包括 Windows 控件库和 Web 控件库 。作为类库部署 Web 应用程序 。
声明VB.NET Main过程
有四种方法可以声明 Main 过程 。它可以使用参数或不使用参数，可以返回值或不返回值 。
注意
如果在类中声明 Main 过程，则必须使用 Shared 关键字 。在模块中，Main 不必是 Shared 。
最简单的方法是声明一个不使用参数或不返回值的 Sub 过程 。
Module mainModule
Sub Main()
MsgBox("The Main procedure
is starting the application.")
' Insert call to appropriate
starting place in your code.
MsgBox("The application
is terminating.")
End Sub
End ModuleMain
还可以返回一个 Integer 值 ， 操作系统将其作为程序的退出代码 。其他程序可以通过检查 Windows ERRORLEVEL 值来测试该代码 。若要返回退出代码 ， 必须将VB.NET Main过程声明为 Function 过程而不是 Sub 过程 。
Module mainModule
Function Main() As Integer
MsgBox("The Main procedure
is starting the application.")
Dim returnValue As Integer = 0

推荐阅读


上一篇：java的一段排序代码，java写一个快速排序

下一篇：cpu双模什么意思，双频cpu