单击退出程序的VB代码怎么写

1输入Private Sub Form1 Click（）EndEnd Sub

2输入Private Sub Command1_Click()

3输入UnloadmeEnd Sub即完成

扩展资料

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

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

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

参考资料：

Private Sub Command1_Click()

If MsgBox("是否要退出程序", vbYesNo + vbExclamation, "退出程序") = vbNo Then

MsgBox "继续留在本窗体中", vbExclamation, "退出程序"

Else

MsgBox "程序准备退出运行状态", vbExclamation, "退出程序"

End

End If

End Sub

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

buttonaddActionListener(new ActionLister(){

void actionPerformed(ActionEvent e)

{Systemexit(0);} );

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

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

实现单击关闭按钮退出程序代码如下： 在窗体的closing事件中 void frm_closing(object sender, FormClosingEventArgs e) { if(MessageBoxShow("确定退出","我的程序",MessageBoxButtonsOKCancel,MessageBoxIconQuestion,MessageBoxDefaultBu

要求先登陆后再进入界面。因此，若是用户取消登陆，则要退出应用程序。

注意，用于重新设计了登陆界面，FormBorderStyle设置的为None，因此窗体右上角并没有关闭的按钮，按照常规如下方法来实现退出，是不现实的。

[csharp] view plain copy

private void F_Login_Close(object sender, EventArgs e)

{

ApplicationExit();

}

那么依次类推，可否添加一个按钮，让其响应事件如上所示呢？

[csharp] view plain copy

private void button1_Click(object sender, EventArgs e)

{

ApplicationExit();

}

通过调试后发现，使用按钮添加如上代码后，程序并没有退出！！！

同样是一个ApplicationExit()，为什么两个地方就不一样了？？？button事件里面ApplicationExit()怎么不能退出应用程序？？

ApplicationExit()停止在所有线程上运行的所有消息循环，并关闭应用程序的所有窗口。该方法并不强制退出该应用程序。Exit方法通常从一个消息循环内调用，该方法强制Run返回。若要只退出当前线程的某个消息循环，请调用ExitThread。

Exit引发下列事件并执行关联的条件 *** 作：

 为OpenForms属性表示的各个窗体引发FormClosing事件。可以通过将这些窗体的FormClosingEventArgs参数的Cancel属性设置为true，取消此事件。

 如果多个处理程序的其中之一取消该事件，则Exit将返回而无进一步 *** 作。否则，将为每个打开的窗体引发FormClosed事件，然后关闭所有正在运行的消息循环和窗体。

也就是说Exit会引发被应用程序打开的所有窗体的FormClosing和FormClosed事件。而且，如果某个窗口的FormClosingEventArgs参数的Cancel属性被设置为true，那么Exit将不会关闭所有窗口和停止所有的消息循环。

从上面可以知道ApplicationExit()并不强制退出应用程序，要想强制退出整个应用程序要用EnvironmentExit()：终止当前进程并为基础 *** 作系统提供指定的退出代码。

通过以上解释，不难找出程序没关闭的原因。知道原因后，除了上面所给出的方法外，还有另外一种简单的方法如下：

[csharp] view plain copy

private void button1_Click(object sender, EventArgs e)

{

thisClose();

}

private void F_Login_Close(object sender, EventArgs e)

{

if(F_MainLogin_User=="")ApplicationExit();//需要加一句判断，不然正常登陆时，它也自动退出了

}

原理一看就明白了。既然button不能强制结束应用程序，但是可以关闭本窗口啊！

通过button关闭本窗口，然后触发窗口的Close事件，通过Close响应事件来调用ApplicationExit()，达到退出应用程序的目的。

以上就是关于单击退出程序的VB代码怎么写全部的内容，包括:单击退出程序的VB代码怎么写、vb中怎么设计一个按钮点击后退出该程序(按钮是新的) 菜鸟求教、如何实现单击程序上的某个按钮执行程序退出，不用exit等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！