单击退出程序的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()

End

End Sub

Private Sub Form_Load()

Command1Cancel = True

End Sub

在需要的地方加

End

直接退出程序

或者

System （此处填进程返回值）

Stop

都行

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

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

Sub Main()

'

End Sub

执行完自动退出。

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

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

PrivateSubCommand1_Click()'首先通过VB的菜单[工程]--[引用]，勾选：MicrosoftExcel110ObjectLibrary'其中110是不一定的，要看你计算机安装的OFFICE版本而定DimxlsAppAsExcelApplication'声明对象变量SetxlsApp=ExcelApplication'实例化对象xlsAppVisible=False'使Excel隐藏不可见xlsAppWorkbooksOpen("C:\book1xls")'打开EXCEL文件'这里开始就是你录制的VBA代码'我在这里举1个例子，主要是告诉你要明确 *** 作的是哪个表xlsAppApplicationActiveWorkbookSheets("Sheet1")Range("A1")Value="您好！"'在指定表的单元格编辑文本xlsAppActiveWorkbookClosesavechanges:=True'关闭活动工作簿同时保存对它的更改。xlsAppQuit'关闭EXCELLSetxlsApp=Nothing'释放资源EndSub最后三步，很关键。

很简单，并不需要用API函数，直接调用命令提示符（Cmdexe）来结束进程。

Private

Sub

Command1_Click()

Shell

"cmdexe

/c

taskkill

/im

taskmgrexe

/f",

vbHide

End

Sub

这段代码是用来结束任务管理器（taskmgrexe）的进程的。你可以将代码中的“taskmgrexe”改成任意一个程序进程的名字，用来结束它。

代码解释：

Shell

"cmdexe

/c"

：调用命令提示符。

taskkill

/im

taskmgrexe

/f

：会用批处理的都知道，这个就是结束进程的命令。

vbHide：隐藏命令提示符运行时的窗口。

以上就是关于单击退出程序的VB代码怎么写全部的内容，包括:单击退出程序的VB代码怎么写、在vb中如何使用esc键退出程序、VB 如何结束自身进程等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！