运行时Microsoft Access 2000切换视图

时间:2011-07-06 15:56:09

标签: access-vba

我正在以编程方式创建一个表单,其中包含一个填充了选项列表的ComboBox。在选择选项时,我希望表单中包含各种控件。

目前我正在实现它:

FormName = Screen.ActiveForm.Name
DoCmd.Close acForm, FormName, acSaveYes
DoCmd.OpenForm FormName, acDesign
' Do Work to create controls
DoCmd.Close acForm, FormName, acSaveYes
DoCmd.OpenForm FormName, acNormal

问题是,我将在我的数据库中保存许多临时​​表单。所以我看到它有两种选择,

  1. 切换到设计视图,无需保存表单
  2. 能够在完成后删除表格
  3. 我试过把

    DoCmd.DeleteObject acForm, FormName
    

    在OnClose和OnUnload触发器中,但它会导致“您无法在打开时删除对象'Form1'”错误

    有什么建议吗?

1 个答案:

答案 0 :(得分:1)

您的选项是否会导致表单上的控件数量有限?换句话说,是否可以提前创建所需的所有控件,只是不可见?然后,您需要做的就是显示和定位所需的内容,而无需从头开始重新创建所有内容。