Hi all,
I am trying to make a script that returns a singular column from a 2 dimensional array, which would be used as data to draw various things in Rhino. However, I always encounter an error when attempting to do this, and I cannot seem to figure out what is wrong with my code. I have my current function reproduced below:
Function ReturnColumn(ByVal col, ByVal array)
Dim colsize, i
colsize = UBound(array, 1)
ReDim vector(colsize)
For i = 0 To colsize
vector(i) = array(i, col)
Next
ReturnColumn = vector
End Function
This should be a very simple function but for some reason I cannot get it to work. Any help is appreciated, thanks!