- 1
- 0
- 约4.69千字
- 约 4页
- 2025-09-04 发布于广西
- 举报
字典方面的基础学习
字典方面的基础学习,谢谢各位帮忙
ccc
想取得arr的不重复值显示在第1行,请帮忙修改代码,谢谢
optionbase1
Subccc()
Dimd,arr,i%
Setd=CreateObject(Scripting.Dictionary)
arr=Array(1,1,1,2,3,44,4,44,4,5)
Fori=1ToUBound(arr)
IfNotd.exists(arr(i))Then
d.Addarr(i)
EndIf
Next
EndSub
呵呵,虚心学习是好
原创力文档

文档评论(0)