Dynamic Arrays : Dynamic Array « Date Functions « VBA / Excel / Access / Word






Dynamic Arrays

 
Sub arrayTest1()
     Dim i As Integer
     Dim intMyScores() As Integer
     Dim intArraySize As Integer
     intArraySize = 10
    
     ReDim intMyScores(intArraySize)
    
     For i = 1 To intArraySize
        intMyScores(i) = i
     Next
    
     For i = 0 To intArraySize
        Debug.Print "For array element " & i & " the number is " & intMyScores(i)
    Next
End Sub

 








Related examples in the same category

1.Declaring and Working with Dynamic Arrays
2.Use ReDim to create dynamic array
3.Using a Dynamic Array
4.There's a potential problem when you try to resize the array:
5.A destroying the old values by using the Preserve keyword
6.Use the Preserve keyword to keep the values
7.Transpose() sub procedure is using a dynamic array that is re-dimensioned with two dimensions.