VBScript 集合用法示例

VBScript 集合用法示例

在VBScript中，集合(Collection)是一种可以存储多个项目的对象，类似于数组但更灵活。以下是VBScript集合的常见用法示例：

1. 创建集合

' 创建集合对象
Set myCollection = CreateObject("Scripting.Dictionary") ' 或者使用 Collection 对象
' 或者
Set myCollection = CreateObject("System.Collections.ArrayList") ' 需要Windows Script Host 5.7+
' 最简单的方式是使用内置的Collection对象
Set myCollection = CreateObject("Collection")

2. 使用Collection对象（最常用）

' 创建Collection对象
Set col = CreateObject("Collection")

' 添加项目到集合
col.Add "苹果"
col.Add "香蕉"
col.Add "橙子"

' 访问集合项目（注意：VBScript集合默认从1开始索引）
WScript.Echo "第一个水果: " & col(1) ' 输出: 苹果

' 遍历集合
For i = 1 To col.Count
    WScript.Echo "水果 " & i & ": " & col(i)
Next

' 删除项目
col.Remove(2) ' 删除第二个项目(香蕉)

3. 使用Dictionary对象（键值对集合）

' 创建Dictionary对象
Set dict = CreateObject("Scripting.Dictionary")

' 添加键值对
dict.Add "apple", "苹果"
dict.Add "banana", "香蕉"
dict.Add "orange", "橙子"

' 访问值
WScript.Echo "apple的中文是: " & dict.Item("apple")

' 检查键是否存在
If dict.Exists("banana") Then
    WScript.Echo "香蕉存在"
End If

' 遍历Dictionary
keys = dict.Keys
For i = 0 To dict.Count - 1
    WScript.Echo "英文: " & keys(i) & ", 中文: " & dict.Item(keys(i))
Next

' 删除项目
dict.Remove("orange")

4. 实际应用示例 - 读取文件夹中的文件

Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder("C:\MyFolder")
Set fileCollection = folder.Files

' 遍历文件集合
For Each file In fileCollection
    WScript.Echo "文件名: " & file.Name
    WScript.Echo "大小: " & file.Size & " 字节"
    WScript.Echo "修改日期: " & file.DateLastModified
    WScript.Echo "---------------------"
Next

5. 自定义对象集合

' 定义一个简单的类
Class Person
    Public Name
    Public Age
End Class

' 创建集合
Set people = CreateObject("Collection")

' 创建对象并添加到集合
Set p1 = New Person
p1.Name = "张三"
p1.Age = 30
people.Add p1

Set p2 = New Person
p2.Name = "李四"
p2.Age = 25
people.Add p2

' 遍历对象集合
For Each person In people
    WScript.Echo person.Name & ", " & person.Age & "岁"
Next

注意事项

1. Collection对象索引从1开始，而大多数编程语言数组从0开始
2. Dictionary对象需要引用"Microsoft Scripting Runtime"或使用后期绑定
3. 集合可以包含不同类型的数据
4. 使用For Each循环遍历集合通常比使用索引更方便

以上示例展示了VBScript中集合的基本用法，可以根据实际需求进行调整和扩展。