- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 程序的中断与恢复 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=38319)
-- 发布时间：2013/7/25 22:32:00
-- 程序的中断与恢复
我希望点击一个窗口的按钮时，程序跳转调用另外的窗口，当另外的窗口关闭时继续下一行命令，怎么实现呢？
如图，点击上传文件的按钮，代码如下：
Dim FilterTreeTemp As String = FilterTree
Dim FilterWordTemp As String = FilterWord
Dim FilterDateTemp As String = FilterDate
Dim FilterStatusTemp As String = FilterStatus
Dim F As WinForm.Form = Forms("文件查询")
f.Show
Forms("文件录入").Visible=False
FilterTree=FilterTreeTemp
FilterWord=FilterWordTemp
FilterDate=FilterDateTemp
FilterStatus=FilterStatusTemp
Dim Filter As String = FilterDate
If FilterTree<>"" Then
Filter=Filter & " and " & FilterTree
End If
If FilterWord <> "" Then
Filter=Filter & " and " & FilterWord
End If
If FilterStatus <> "" Then
Filter=Filter & " and " & FilterStatus
End If
Tables("归档文件").Filter=Filter
本窗口隐藏，程序跳转至另外的窗口，当另外的窗口关闭后继续执行下一句，就像调用子程序一样
此主题相关图片如下：裁剪.jpg
此主题相关图片如下：裁剪.jpg-- 发布时间：2013/7/26 8:46:00
--
你将另外的窗口的窗口类型设置为模式窗口即可
-- 发布时间：2013/8/4 22:37:00
--
谢谢，已解决