首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

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

2012-07-28 
在PB中,如何查看所有已打开的窗体的名称?谢谢在PB中,如何找到所有已打开的窗体的名称呢? 谢谢window lw_sh

在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

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

热点排行