返回列表 上一主題 發帖

[發問] 有沒有甚麼方式可以複製物件?CreateObject("SCRIPTING.DICTIONARY")

准提部林

帖子
2804 
主題
10 
精華
0 
積分
2860 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-5-2 
1# 跳轉到 »
發表於 2016-8-9 22:11 | 顯示全部帖子
第一個字典, 不要的去除後, 當然要從頭來過,
反之, 將要的丟到陣列, 或丟到另一字典, 第一個還是本來面目!

TOP

准提部林

帖子
2804 
主題
10 
精華
0 
積分
2860 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-5-2 
2#
發表於 2016-8-10 12:36 | 顯示全部帖子
Arr=完整資料
Brr=比對資料
Crr=比對資料

For Each B In Brr:  Dic1(B)="":  Next
For Each C In Crr:  Dic2(C)="":  Next

For Each A In Arr
    If Not Dic1.Exists(A) Then Dic3(A)=""
    If Not Dic2.Exists(A) Then Dic4(A)=""
Next

Dic3 及 Dic4 就是個別排除後的資料,
全部一個迴圈完成!

TOP

        靜思自在 : 滴水成河。粒米成蘿，勿輕己靈，勿以善小而不為。
返回列表 上一主題