溢出和你的内存大小有关吧?
Dim ls As new List(Of String)For i As Integer = 1 To 50000 ls.add(Rand.NextDouble)Nextmsgbox(ls.count)