README.md

December 4, 2022 ยท View on GitHub

Nested Arrays Solution

Description

Example

More Info

Submitted On
ByULLI
LevelBeginner
User Rating4.6 (23 globes from 5 users)
CompatibilityVB 6.0
CategoryData Structures
WorldVisual Basic
Archive File

Source Code

Option Explicit
Private Type tNested
  Blah      As String
  Blabla     As Long
End Type
Private Type tSomething
  Stuff      As String
  MoreStuff    As Long
  aNested()    As tNested
  Whatever    As Integer
End Type
Private aSomething() As tSomething
Private Sub Form_Click()
 Dim i As Long
  ReDim aSomething(1 To 500)
  For i = 1 To 500
    ReDim aSomething(i).aNested(1 To 10)
  Next i
  aSomething(12).aNested(7).Blah = "Hallo Michael"
  Debug.Print aSomething(12).aNested(7).Blah
End Sub