How to remove equal data from list (made by randomizer)?

Replies to This Discussion

Permalink Reply by Eric Werner on September 8, 2009 at 11:34am

Hi you could try and use this code below its super basic and sorts your data and checks that there are no numbers that are duplicate.

Copy the code into a VB component. (except the first an last line!)

Sub RunScript(ByVal aList As List(Of Double))

Dim nList As New List(Of Double)

aList.sort()

For i As int32 = 1 To aList.Count - 1 Step 1
If Not aList(i - 1) = aList(i) Then

nList.add(aList(i - 1))

End If
Next

a = nList

End Sub

Permalink Reply by Philipp on September 8, 2009 at 3:05pm

tnks.
in perspective it will be good if dublicats will "reseed" to make "number of data" parameter more clear.