[.NET] 點的排序
我是使用3d繪圖軟體rhinocerous裡的插件grasshopper來寫的vb
不知道po在這適合嗎?
主要要問的問題是這段:
Sub GenerateGrid(ByVal Points As List(Of On3dPoint), ByVal xNum As Integer, ByVal yNum As Integer, ByRef Grid As On3dPoint(,))
Dim i,j As Integer
Dim x,y As Integer
x = 0
y = 0
'Create rows
For i = 0 To Points.Count()-1 Step xNum+1
y = 0
For j = i To i + yNum
Dim pt As New On3dPoint(Points(j))
Grid(x, y) = pt
y = y + 1
Next
x = x + 1
Next
End Sub
假設我輸入的Points有12個點,坐標如下:
(0,2)(1,2)(2,2)(3,2)
(0,1)(1,1)(2,1)(3,1)
(0,0)(1,0)(2,0)(3,0)
xNum=3,yNum=2
請問要怎樣修改點的數點順序才會正確呢?
因為當我的點變更多時,例如有1040個點,xNum=39,yNum=25時
就會出現在數點時會只數到一哥數字就沒在數了
然後就會跳去下一行
變成結果類似這樣:
o o o o o o
o o o o o o
o o o o o o
o o o o o o
o o o o o o
o o o o o o
o o o
o o o
o o o
o o o
o o o
o o o
o o o
一些點產出來的結果是null,所以就會形成類似這樣的pattern出現
不知道這樣又說明清楚嗎?
因為其實本身對vb只會一點點,這是在網路找到然後自己修改局部的程式
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.116.1
→
03/13 05:13, , 1F
03/13 05:13, 1F
→
03/13 05:14, , 2F
03/13 05:14, 2F
→
03/13 09:56, , 3F
03/13 09:56, 3F
→
03/13 12:18, , 4F
03/13 12:18, 4F
→
03/13 12:19, , 5F
03/13 12:19, 5F
→
03/13 15:49, , 6F
03/13 15:49, 6F
→
03/13 15:51, , 7F
03/13 15:51, 7F
→
03/13 15:52, , 8F
03/13 15:52, 8F
→
03/13 15:53, , 9F
03/13 15:53, 9F