从品牌网站建设到网络营销策划,从策略到执行的一站式服务
Me.Close是关闭窗体,如果程序只有一个主窗体,就直接关闭程序了
10年积累的网站制作、成都网站建设经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站策划后付款的网站建设流程,更有南岔免费网站建设让你可以放心的选择与我们合作。
Me.Dispose用来释放组件,通常不需要手工调用它
End是强制关闭程序,而不理程序现在的状态,只有万不得已的情况下,才使用这个命令。
正常都会调用Me.Close,然后Me.Close就会自动调用Me.Dispose。
所以Me.Close是资源释放最彻底的方式。
而End是资源释放最不彻底的方式。
使用api
Private Declare Function TerminateThread Lib "kernel32" (ByVal hThread As Long, ByVal dwExitCode As Long) As Long
定义一个公有布尔值变量 flag,初始值 False。
循环里最开始 If 判断一下 flag,如果为 True 就 Exit Do 跳出循环,否则继续循环。
然后在别的函数控制 flag 的值就可以了。
P.S. 你这段代码是死循环,直到程序占用内存越来越大溢出进而程序崩溃为止……
Sub aaa()
MsgBox("111")
application.exit
End Sub
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图