Do
......
lstDirs.RemoveItem 0 if bExit=True Then Exit DoLoop Until lstDirs.ListCount = 0Until lstDirs.ListCount = 0Private Sub cmdexit_Click()
bExit= True
Unload Me
End Su
......
lstDirs.RemoveItem 0 if bExit=True Then Exit DoLoop Until lstDirs.ListCount = 0Until lstDirs.ListCount = 0Private Sub cmdexit_Click()
bExit= True
Unload Me
End Su
解决方案 »
- 用VB对solidworks二次开发,总是出现变量未设置怎么回事?
- 利用VB操作excel的问题
- Winsock数组最多可Load多少个?
- 一个没有弄懂的问题—控件-表间字段关联
- 文件访问跟踪如何实现?
- 谁有EAN-13条码字体,死活找不到..
- 谁能帮我分析一下“时钟”程序的数学模型是什么??
- 是高手就过来看一下!!我在控件中替换了控件的窗口过程,结果在调试的时候只要中断调试vb就自动退出,怎么办???
- 怎么才能压缩出打开后就能执行压缩包的全部文件啊??→急!!
- win10的mscomm32.ocx问题
- 我已研究了很长时间(一年多)关于Winsock的一个问题
- 什么是b/s、c/s结构????
...... if bExit=True Then
Exit Do
else
lstDirs.RemoveItem 0
End ifLoop Until lstDirs.ListCount = 0Until lstDirs.ListCount = 0Private Sub cmdexit_Click()
bExit= True
Unload Me
End Sub