algorithmic modeling for Rhino
VB script to removel null values from list
I am trying to remove the null values from a list of planes, and output the clean list of planes.
Dim CleanList As New List (Of OnPlane)
Dim i As Integer
For i = 0 To x.Count() – 1
If x(i) = Nothing
Return
End If
CleanList.Add(x(i))
Next
A = CleanList
End Sub
Dim CleanList As New List (Of OnPlane)
Dim i As Integer
For i = 0 To x.Count() – 1
If x(i) = Nothing
Return
End If
CleanList.Add(x(i))
Next
A = CleanList
End Sub
Views: 615
Replies to This Discussion
-
Permalink Reply by Dirk Anderson on
-
This should work:
Sub RunScript(ByVal x As List(Of OnPlane))
Dim CleanList As New List (Of OnPlane)
For i As Int32 = 0 To x.Count() – 1
If (x(i) <> Nothing) Then
CleanList.Add(x(i))
End If
Next
A = CleanList
End Sub -
-
Permalink Reply by Tuan N. Tran on
-
You can also use the "Clean Tree" component.
-
About
Welcome to
Grasshopper
Translate
Search
Photos
Videos
© 2025 Created by Scott Davidson.
Powered by
