Returning a singular column from a 2D array?

@Kevin2 wrote:

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!

Posts: 1

Participants: 1

Read full topic