在PB中，怎么查看所有已打开的窗体的名称？多谢

在PB中，如何查看所有已打开的窗体的名称？谢谢
在PB中，如何找到所有已打开的窗体的名称呢？ 谢谢




window lw_sheet
lw_sheet = Parent.GetFirstSheet()
do while true
  If IsValid(lw_sheet) Then
  Close(lw_sheet)
  Else
  Exit
  End If
  lw_sheet = Parent.getnextsheet(Parent.getactivesheet())
loop

------解决方案--------------------
boolean bValid

 

window wSheet

 

lb_sheets.Reset()

 

wSheet = ParentWindow.GetFirstSheet()

 

IF IsValid(wSheet) THEN

 

lb_sheets.AddItem(wSheet.Title)

 

DO

 

wSheet = ParentWindow.GetNextSheet(wSheet)

 

bValid = IsValid (wSheet)

 

IF bValid THEN lb_sheets.AddItem(wSheet.Title)

 

LOOP WHILE bValid

 

END IF

楼主按这个方法试下。。。