按条件关闭用户窗体或窗口

Question

我使用的软件没有加载窗口/图片，因此当我运行它时，我不知道它何时开始运行。虽然我可以在taskmanager中监视正在运行的.exe任务，但我想在VBA中创建一个“加载窗口”，以使加载过程更加明显。我认为实现这一目标的一种可能方法是编写一个包含shell（。）命令和测试条件的简单宏（例如，如果计数器计数到130，则自动关闭表单 结束if）。问题是当我尝试使用Unload Me时，除非它是click事件的一部分，否则不能使用它。这是我打开表单的代码：

Sub Loadpic()

LPic.Show

End Sub

Answer 1

你可以用这个

Unload LPic
Do Events

您可以在属性对话框中找到formname（查看表单时按F4）