教你如何批量關(guān)閉窗口,省時又省力!
2023-06-13 15:59 作者:易登軟件Access | 我要投稿


哈嘍哈嘍,大家好,今天我們來分享一個小功能。
在實際的應(yīng)用場景中,我們可能需要打開多個窗口,在關(guān)閉窗口時,逐個關(guān)閉窗口可能比較繁瑣,而且有些窗口雖然不再顯示了,但可能是隱藏的。在這種情況下,該怎么處理呢?讓我們一起動手來嘗試一下吧。
PART 1創(chuàng)建窗體
為了方便測試,我們可以先創(chuàng)建多個窗體,越多越好。

同時我們需要再創(chuàng)建一個窗體,放上按鈕控件。

PART 2代碼統(tǒng)計未關(guān)閉的窗口
為了測試,我們再做一個窗體,在窗體上放一個按鈕控件。

接著,添加一個按鈕的單擊,用于窗體的隱藏
?Me.Visible = False
接著,運行一下窗體2,點擊隱藏,將這個窗體隱藏一下。當然,我們需要再打開幾個窗體,這里我們再打開兩個窗體。
最后,我們再立即窗口輸入:?Forms.Count
敲個回車,統(tǒng)計一下目前運行的窗體,統(tǒng)計是3個窗體。這樣我們就知道有3個窗體運行著。

PART 3添加關(guān)閉代碼
最后,我們在窗體1中添加一下關(guān)閉的代碼:
PART 4運行測試
代碼添加好后,我們可以直接點擊關(guān)閉按鈕,關(guān)閉后,我們還是在立即窗口輸入:?Forms.Count

我們看到結(jié)果輸出是0,這說明批量關(guān)閉的代碼生效了,把隱藏的窗體也給正真意義上的關(guān)閉。
好了,大家快去試一下吧。