是否可以显示用户窗体并执行.show方法下面的代码?

时间:2019-06-04 20:39:03

标签: vba vb6

我想从Userform1中显示Userform2,然后继续在Userform1中执行一些代码没有卸载Userform1

Private Sub CommandButton1_Click()    
 UserForm2.Show
 x = 1
 MsgBox x

End Sub

2 个答案:

答案 0 :(得分:4)

不确定这就是您想要的,但这将按照您的描述进行:

UserForm2.Show vbModeless

请注意,UserForm2不再是模态的,这意味着用户可以在表单外部单击,甚至最终将其隐藏在UserForm1后面。

模态表单在被隐藏/关闭或销毁时将执行返回给调用者,无模态表单将立即将执行返回给调用者(InitializeActivate处理程序将首先运行)。

答案 1 :(得分:1)

假设您的意思是不卸载df.repartition(100, $"userId").sortWithinPartitions("userId").write.parquet(...) ...

Userform2将等待Userform1完成...但是您可以执行以下操作:

用户表单1:

Userform2

用户窗体2:

Private Sub CommandButton1_Click()
 UserForm2.Show

End Sub

Sub uf1msgbox()

 X = 1
 MsgBox X

End Sub