建議Document對(duì)象增加對(duì)全局變量的功能 遍歷機(jī)制　[金字塔]

我經(jīng)常需要將程序運(yùn)行過程中的臨時(shí)變量寫到全局變量中，如果每天都不清除這些全局變量，那么就會(huì)很混亂，有些變量是需要保留的，而有些是不需要的，這些變量在保存的時(shí)候會(huì)以當(dāng)時(shí)的賬戶、合約代碼和價(jià)格等信息組合而成的變量名稱，要?jiǎng)h除這些變量的話，最好的方法就是循環(huán)讀取每一個(gè)變量，逐個(gè)刪除，或者刪除具有一定前綴的特定變量。

所以建議開發(fā)人員對(duì)document對(duì)象進(jìn)行功能增強(qiáng)，提供：

1、基于0的索引遍歷機(jī)制

2、刪除某1個(gè)全局變量的功能

3、刪除某些前綴的全局變量的功能。

4、批量修改某一特征的全局變量的值的功能。

采納

王鋒版主，今天你心情肯定很好吧，我以前都提過的問題，你都沒有理我，今天全部采納。

我也很開心，謝謝你了，我越來越喜歡金字塔了。做的項(xiàng)目一個(gè)比一個(gè)大了。

2.92果然增加了這些功能，我簡(jiǎn)單測(cè)試了一下，屬性中的 ExtDataNum、ExtDataStringNum可以分別返回?cái)?shù)值型和字符型變量的個(gè)數(shù)，

但是不能遍歷，每次返回的都是第一個(gè)變量。

以下是測(cè)試代碼：

sub testglobal()
 dim KeyName
 
 iCount1=Document.ExtDataNum()
 application.MsgOut cdate(time)&",iCount1:"&iCount1
 for i=0 to iCount1-1
  Result = Document.GetExtDataByIndex(i,KeyName)
  KeyValue=document.GetExtData(KeyName)
  application.MsgOut "KeyName:"&KeyName &",KeyValue:"&KeyValue
 next
 
 iCount2=Document.ExtDataStringNum()
 application.MsgOut cdate(time)&",iCount2:"&iCount2
 for i=0 to iCount2-1
  Result = Document.GetExtStringByIndex(i,KeyName)
  KeyValue=document.GetExtString(KeyName)
  application.MsgOut "KeyName:"&KeyName &",KeyValue:"&KeyValue
 next
 
end sub

而刪除指定索引位置的變量的方法RemoveExtData不能刪除，RemoveExtString只能刪除索引為0位置的變量，請(qǐng)開發(fā)人員測(cè)試。