C# と VB.NET の質問掲示板

↓ こんなとこでしょか。VBおんちなのでこれがフツーの書き方か自信ないけども。

Imports System.Collections.Generic

Module Module1

Sub Main()
  Dim strlist As New List(Of String())
  Dim strarray As String()

  ReDim strarray(3)
  strarray(0) = "aaa1"
  strarray(1) = "aaa2"
  strarray(2) = "aaa3"
  strlist.Add(strarray)

  ReDim strarray(3)
  strarray(0) = "bbb1"
  strarray(1) = "bbb2"
  strarray(2) = "bbb3"
  strlist.Add(strarray)

  For i As Integer = 0 To strlist.Count - 1
    Dim tmp() As String = strlist(i)
    Console.WriteLine(tmp(0))
    Console.WriteLine(tmp(1))
    Console.WriteLine(tmp(2))
  Next

End Sub

End Module