批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程
[批处理文件精品]批处理版照片整理器[批处理文件精品]纯批处理备份&还原驱动在线第三方下载
返回列表 发帖

[问题求助] VBS字典问题

各位老师,字典代码如下:

ArrSheetData数据数据:
ArrSheetData(1,1)=1:ArrSheetData(1,2)="张三1"
.......
ArrSheetData(61,1)=61:ArrSheetData(61,2)="张三61"

For i = 1 To 61
    If Len(ArrSheetData(i,1)) > 1 then
        Dic(Trim(Out_Arr(i,1))) = ArrSheetData(i,2)
    End If
Next
msgbox DIc.count  提示 ”1“,如果 msgbox Dic(Trim(Out_Arr(i,1))),正常显示循环数据。

各位老师这是咋回事呀

返回列表