What is the best VBA data type`key`=>`value` to save data same as PHP array

前端 未结 2 586
忘了有多久
忘了有多久 2021-02-07 15:02

I\'m working with VBA and need to save data in type key=>value to getting fastest; This data type help me cache responese text from http request, incre

2条回答
  •  感情败类
    2021-02-07 15:08

    Have you looked at dictionary object?

    It's available as part of the Microsoft Scripting Runtime. A clear example of how to add this is given by this SO answer.

    Sub DictExample1()
    
    Dim dict As Dictionary
    Dim v As Variant
    
        'Create the dictionary          
        Set dict = New Dictionary
    
       'Add some (key, value) pairs
        dict.Add "John", 34
        dict.Add "Jane", 42
        dict.Add "Ted", 402
    
        'How many items do we have?
        Debug.Print "Number of items stored: " & dict.Count
    
        'We can retrieve an item based on the key
        Debug.Print "Ted is " & dict.Item("Ted") & " years old"
    
    
       'We can test whether an item exists
        Debug.Print "We have Jane's age: " & dict.Exists("Jane")
        Debug.Print "We have Zak's age " & dict.Exists("Zak")
    
        'We can update a value by replacing it
       dict.Item("Ted") = dict.Item("Ted") / 10
    
        Debug.Print "Ted's real age is: " & dict.Item("Ted")
    
       'We can add more items
        dict.Add "Carla", 23
    
       'And we can iterate through the complete dictionary
        For Each v In dict.Keys
            Debug.Print "Name: " & v & "Age: "; dict.Item(v)
        Next
    
    End Sub
    

    (Source: http://www.techbookreport.com/tutorials/vba_dictionary.html)

提交回复
热议问题