【求助】删除窗体所有控件的代码。【已解决】

doney88

本人在尝试动态根据数据源添加文本框的代码。用于动态显示交叉查询的数据源的窗体（数据表视图）。
基本已经搞定如何插入控件。现在问题来了。

每次开始前无法删除窗体所有控件。尝试过 application.deltecontrols的功能似乎没用。代码如下。

        For Each ctl In mfrmPvt.Controls
            Application.DeleteControl 窗体名, ctl.Name
        Next


求大神帮助！

经过测试改成即可
        For i = 0 To mfrmPvt.Controls.Count - 1
            Application.DeleteControl mstrFormName, mfrmPvt.Controls(0).Name
        Next