如何处理模态用户窗体？

Question

我有一个用户窗体ShowModal设置为True。我想将对话框用作表单和进度条，因此在用户单击“确定”后，表单应保持在屏幕上，但代码应该在后台继续执行。要做到这一点，最好的方法是什么？

目前，我有两种形式，一种用户在其中输入数据，然后第二进度条。我宁愿将这些合并为一个形式简单

Answer 1

的一种方式将是一个进度条控件添加到您的主要形式。 （要做到这一点在Excel中，从表单编辑器，在您的工具框右键单击选择另外的控制，然后选择Microsoft进度控制6.0（SP6）。它的选择后，您可以添加它就像任何其他的控制。）

从那里你只需调用有问题的用户表单中的代码，这将保持表单。然后，如果你想更新进度，你可以将控制权交给sub（还有其他方法，这只是懒惰的方式）。

Private Sub CommandButton1_Click() 
    Module1.MyCode Me.ProgressBar1 
End Sub 

Public Sub MyCode(ByRef progress As MSComctlLib.ProgressBar) 
    'Do stuff 
    progress.value = progress.value + 10 
    'Do more stuff 
    progress.value = progress.value + 50 'It was a lot of stuff 
    'And so on. 
End Sub