Dim list1 As New List(Of String) For k = 0 To Convert.ToInt64(2 ^ 26) Try Dim toto as string = k.ToString() list1.Add(toto) Catch ex As Exception MessageBox.Show(ex.Message) End Try Next
Dim list1 As New List(Of String) For k = 0 To Convert.ToInt64(2 ^ 26) Try Dim toto as string = k.ToString() list1.Add(toto) toto = Nothing Catch ex As Exception MessageBox.Show(ex.Message) End Try Next