pb怎么一次性关闭主窗口下的所有打开的子窗口

pb如何一次性关闭主窗口下的所有打开的子窗口
b如何一次性关闭主窗口下的所有打开的子窗口

------解决方案--------------------
window lw_sheet
do while true
lw_sheet = this.GetActiveSheet ( )

If IsValid ( lw_sheet ) Then 
//Return Close ( lw_sheet )
Close ( lw_sheet )
Else
Return -1
End If
loop