Dim lists As new List(of List(of String)) Dim lists1 As new List(of String) lists1.add("1111") Dim lists2 As new List(of String) lists2.add("456") Dim lists3 As new List(of String) ' {"2222","3333","4444"} lists3.add("222") lists3.add("333") lists3.add("444") lists.Add(lists1) lists.Add(lists2) lists.Add(lists3) For Each li As object In lists For Each l As String In li Output.Show(l) Next Next
|