主窗体关闭后主程序仍然运行,怎么回事? 我的程序遇到个怪问题,将主窗体关闭了,可在结束任务中仍然看到主程序运行中,请问各位是哪出了问题? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 资源没有彻底释放。霸道一点,在unload里加上一句End. Private Sub Form_Unload(Cancel As Integer) EndEnd Sub 恩。要加end。不然只是窗体关闭了。程序并没有关闭 要想让你的程序写得更健壮和优化,你还是要先找到不能结束的原因,用“end”只是治“表”,而不治“根”,写程序要养成良好的习惯,特别是VB程序员,以前我也是从VB学起的,后来使用C/C++,才发现以前在用VB时养成太多不好的编程习惯了,经常出现一些低级错误 看看那些窗体或资源没有释放掉小小的建议:Private Sub ShutDown() Dim lfForm As Form '卸载窗体 For Each lfForm In Forms If lfForm.Name <> Me.Name Then Unload lfForm End If Next '释放资源 DB.Close '卸载自己 EndEnd Sub 强烈建议:程序退出前记得关闭所有的资源占用和所有连接,不要没搞清楚就End,这样的习惯对你以后编程会带来很大的麻烦。对于自己的程序或者说自己做的工程,一定是要弄得非常清楚,否则,后患无穷呀。 没有释放掉!如下:Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) EndEnd SubPrivate Sub Form_Unload(Cancel As Integer) EndEnd Sub 试试这个~!Private Sub Form_Unload(Cancel As Integer) RecordSet1.Close Connect1.Close RecordSet1.Nothing Connect1.Nothing EndEnd Sub 使用Shell运行控制台程序时,shell与VB程序是异步的,也就是同时执行的,如果你运行了比较大的控制台程序,当VB退出时,控制台程序仍在运行 是有两个窗体没有释放,我也怀疑是这两个窗体数据库的连接问题,可我已经在如下中断开了.Private Sub Form_Unload(Cancel As Integer) Cnn_BH.Close End Sub VB 反编译 关于应用mssqlserver服务的问题 SQL表记录修改问题!!急!!! 不知道哪位大侠会用fpspread表格控件的公式功能 zhangcyu (30)、 yoki (70) 拿分 对面的高手看过来:VB动态链接库的问题? 求actives date 2.5 library 在线急问:日期格式问题 vb数组问题 请求yangao进来看看 msgbox函数问题 急!!!!!! 寻LanTalk工作原理,UP有分。解决好这200分全散,另开帖给解答人
霸道一点,在unload里加上一句End.
End
End Sub
小小的建议:
Private Sub ShutDown()
Dim lfForm As Form
'卸载窗体
For Each lfForm In Forms
If lfForm.Name <> Me.Name Then
Unload lfForm
End If
Next
'释放资源
DB.Close '卸载自己
EndEnd Sub
如下:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
End
End SubPrivate Sub Form_Unload(Cancel As Integer)
End
End Sub
Private Sub Form_Unload(Cancel As Integer) RecordSet1.Close
Connect1.Close
RecordSet1.Nothing
Connect1.Nothing
EndEnd Sub
Private Sub Form_Unload(Cancel As Integer)
Cnn_BH.Close
End Sub