VB 如何结束自身进程

在需要的地方加

End

直接退出程序

或者

System （此处填进程返回值）

Stop

都行

当然，最好考虑关闭自己的所有窗口 使用Unload Me'点自己的关闭按钮。

如果你不需要窗体，删掉他新建模块用

Sub Main()

'

End Sub

执行完自动退出。

当然 调ExitProcess也是个办法，但是你真的希望连着VB的编辑器一起退出吗？

如果你不需要VB的编辑器，干脆把你的代码编译成EXE，想用多少遍用多少遍，还快。

试试这个，Form_Unload的那个删了。

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

Dim strExit As String

If UnloadMode <> vbAppWindows Then

strExit = "您确定要停止运行吗？"

If vbNo = MsgBox(strExit, vbQuestion Or vbYesNo, "") Then

Cancel = True

Exit Sub

End If

End If

End

End Sub

QueryUnload 事件

当一个子窗体或一个 Form 对象关闭时，在那个窗体中的 QueryUnload 事件先于该窗体的 Unload 事件发生。

Private Sub Form_QueryUnload(cancel As Integer, unloadmode As Integer)

cancel 一个整数。将此参数设定为除 0 以外的任何值，可在所有已装载的窗体中停止 QueryUnload 事件，并阻止该窗体和应用程序的关闭。

unloadmode 一个值或一个常数，如返回值中所描述的，它指示引起 QueryUnload 事件的原因。

常数是在对象浏览器有。

说明

此事件的典型用法是在关闭一个应用程序之前用来确保包含在该应用程序中的窗体中没有未完成的任务。例如，如果还未保存某一窗体中的新数据，则应用程序会提示保存该数据。

当一个应用程序关闭时，可使用 QueryUnload 或 Unload 事件过程将 Cancel 属性设置为 True 来阻止关闭过程。但是，QueryUnload 事件是在任一个卸载之前在所有窗体中发生，而 Unload 是在每个窗体卸载时发生。

你好！

ctrl+break或ctrl+c，有时要多按几下,然后结束所运行的程序保存即可。另外，建议你点击菜单工具--选项，选择环境选项卡，选中“启动程序时”“提示保存改变”，这样可以提醒你在运行前保存程序。

如有疑问，请追问。

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

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

关闭提示"把下面的代码复制到你的程序里面，你可以自己根据需要更改;，否则继续程序，选择是则关闭，当你点上面那个交叉关闭程序的时候它就d出对话框询问你是否要关闭程序！这只是个思路！

Private

Sub

Form_Unload(Cancel

As

Integer)

Dim

ms

As

String

ms

=

MsgBox("？",

vbYesNo

+

32,

"你是否要退出程序

1输入Private Sub Form1 Click（）EndEnd Sub

2输入Private Sub Command1_Click()

3输入UnloadmeEnd Sub即完成

扩展资料

在VB中，注释有2种方式。

1以Rem关键字开头，并且Rem关键字与注释内容之间要加一个空格。注释可以是单独的一行，也可以写在其他语句行的后面。如果在其他语句行后使用Rem关键字，则必须使用冒号（:）与语句隔开。

2也可以使用一个撇号来代替Rem关键字，若使用撇号，则在其他语句行使用时不必加逗号。

参考资料：

百度百科 vb

VB可使用Exit语句可强制退出循环结构。

Exit 语句，退出 DoLoop、ForNext。

语法

Exit Do

Exit For

Exit 语句示例

本示例使用 Exit 语句退出 ForNext

循环、DoLoop 循环及子过程。

Sub ExitStatementDemo()

Dim I, MyNum

   Do            ' 建立无穷循环。

      For I = 1 To 1000   ' 循环 1000 次。

         MyNum = Int(Rnd  1000)   ' 生成一随机数码。

         Select Case MyNum   ' 检查随机数码。

            Case 7: Exit For   ' 如果是 7，退出 ForNext 循环。

            Case 29: Exit Do   ' 如果是 29，退出 DoLoop 循环。

            Case 54: Exit Sub   ' 如果是 54，退出子过程。

         End Select

      Next I

   Loop

End Sub

以上就是关于VB 如何结束自身进程全部的内容，包括:VB 如何结束自身进程、VB 退出程序、vb程序如何退出死循环 比如说那个彩屏的代码就是死循环等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！