vb中怎样通过命令按钮结束一个过程

LSD,请不要给布尔型变量赋 数值

False = 0

True = -1

================================

一般而言，用一个Boolean变量来保存过程是否要继续执行

TRUE表示继续，FLASE表示终止

但在一个过程运行时，VB就像死了一样，无法进行其他 *** 作，所以VB提供了一个函数

DoEvents()

使程序在处理一个过程的同时，还能进行其他 *** 作。

如

Dim Doing As Boolean

Private Sub Command1_Click()

Doing = False

End Sub

Private Sub Command2_Click()

DoEvents

If Not Doing Then Exit Sub

'//Add code 1 here

If Not Doing Then Exit Sub

'//Add code 2 here

'//

End Sub

一）首先需要是每个运行窗体有以下代码，使窗体右上角那个关闭的X按钮失效。

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

    Cancel = True

End Sub

二）应该使用MsgBox 函数来选择是否结束程序。

MsgBox 函数

在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。

以下是一段使用MsgBox 函数来结束程序的按钮代码：

Private Sub Command4_Click()

    Dim Msg, Style, Title, Help, Ctxt, Response, MyString

    Msg = "结束程序 "   ' 定义信息。

    Style = vbYesNo + vbCritical + vbDefaultButton2   ' 定义按钮。

    Title = "结束程序"   ' 定义标题。

    Help = "DEMOHLP"   ' 定义帮助文件。

    Ctxt = 1000   ' 定义标题

    ' 上下文。

    ' 显示信息。

    Response = MsgBox(Msg, Style, Title, Help, Ctxt)

    If Response = vbYes Then   ' 用户按下“是”。

        MyString = "Yes"   ' 完成某 *** 作。

        Unload FrmComm

        Unload frmCeshi

        Unload frmchaxunNew

        End

    Else   ' 用户按下“否”。

        MyString = "No"   ' 完成某 *** 作。

    End If

End Sub

三）注意上述结束程序使用了Unload语句

Unload 语句

从内存中卸载窗体或控件。

不要使用End语句，End 语句提供了一种强迫中止程序的方法。Visual Basic

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

添加按钮侦听器addActionListener()，当按下按钮之后，就退出程序。

buttonaddActionListener(new ActionLister(){

void actionPerformed(ActionEvent e)

{Systemexit(0);} );

用JFrame写的java小应用是直接带有窗口的，在main()中加上setDefaultCloseOperation(JFrameEXIT_ON_CLOSE)。

如果想写点击事件来实现关闭窗口，试试 Systemexit(0);

<button id="btn_exit" click="Exit();" value="退出" />

<script>

var Exit=function(){

请求某个地址清空Session,

或清空Cookies

locationhref='loginhtml';

或者windowclose();

}

</script>

所谓开始程序，你可以这么设计，将你想运行的代码，专门写在一个函数中，然后在你的开始按钮的事件中，调用这个函数。

至于结束按钮，同理，在结束按钮的事件中，写exit（0），或者其他之类的结束办法

希望能帮到你

以上就是关于vb中怎样通过命令按钮结束一个过程全部的内容，包括:vb中怎样通过命令按钮结束一个过程、VB运行结束按钮点击才结束，需要代码、如何实现单击程序上的某个按钮执行程序退出，不用exit等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！