国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

從頭開始刪除集合項目

2019-11-18 17:30:11
字體:
來源:轉載
供稿:網友
刪除集合中的所有內容有許多方法,其中有些非常得迅速。來看看一個包含10,000個項目的集合:
DimcolAsNewCollection,iAsLong
Fori=1To10000
  col.Addi,CStr(i)
Next

可以從末尾位置為起點刪除集合內容,如下:


Fori=col.CountTo1Step-1
col.Removei

Next

也可以從開始位置為起點刪除集合內容,如下:

Fori=1Tocol.CountStep1
col.Removei
Next

試驗證明,后者要快于前者百倍多,比如0.06秒比4.1秒。原因在于:當引用接近末尾位置的集合項目時,VB必須要從第1個項目開始遍歷整個的項目鏈。<>
更有趣的是,如果集合項目的數量加倍,那么從末尾開始刪除與從頭開始刪除,前者要比后者花費的時間將成倍增長,比如前者是24秒,后者可能為0.12秒這么短!
最后提醒您:刪除集合的所有內容的最快方法就是“毀滅”它,使用下面的語句:Setcol=NewCollection

對于一個包含20,000個項目的集合,上述操作僅僅耗時0.05秒,這比使用最快的循環操作進行刪除也要快2倍左右。->


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 台中县| 宁南县| 通化县| 惠来县| 子长县| 马公市| 沧源| 神木县| 洪江市| 太湖县| 洮南市| 县级市| 施甸县| 唐山市| 财经| 赤峰市| 法库县| 康平县| 惠东县| 眉山市| 临高县| 宣武区| 英吉沙县| 白河县| 陵川县| 青神县| 广宗县| 肃宁县| 甘泉县| 高陵县| 巴彦淖尔市| 桦川县| 桃园县| 眉山市| 鄂托克前旗| 宣威市| 会同县| 固原市| 双柏县| 霍邱县| 荆州市|