我希望点击一个窗口的按钮时,程序跳转调用另外的窗口,当另外的窗口关闭时继续下一行命令,怎么实现呢?
如图,点击上传文件的按钮,代码如下:
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
