如果使用“X”关闭新表单，VBA表单不会保留数据

Question

我创建了一个表单，用户可以在其中双击列表框条目以打开另一个表单以获取信息。当用户关闭新表单时，我希望保留原始表单上的现有数据。但是，在我当前的代码中，如果用户点击＆＃34; X＆＃34;则不会保留原始数据。关闭新表格。

代码：

Private Sub lstServiceHistory_DblClick (ByVal Cancel As MSForms.ReturnBoolean)
   frmJobDetails.Show
End Sub

如何将数据保留在原始表单上？

Answer 1

我通过在form_Activate事件中添加一个布尔检查来解决问题，以查看表单是否已经初始化。