[求助]VB计算点的坐标求助

xmok · 发表于 2008-11-29 10:00:00

我有大量的数据，就是点的坐标，有时多大上万个点的坐标，对于重复的点的坐标，我只要取一个就可以了。那这样咋用VB编程呀？

xmok · 发表于 2008-11-29 15:17:00

我先把点的坐标用“，”号连成字符串
再用那个SPLIT来分割，用
Dim xx
xx = Split(str2, ",")
Dim strResult
strResult = xx(0)
str1 = str1 & xx(0)
NodeNum = 1
For i = 0 To UBound(xx)
      If InStr(strResult, xx(i)) = 0 Then
         strResult = strResult & "," & xx(i)
         str1 = str1 & " " & xx(i)
         NodeNum = NodeNum + 1  (这个是统计实际有效点的数量的)
      End If
Next
这里的UBound(xx)显示是溢出。怎样才能得到真正有效点的对应的节点坐标呢？
求各位大侠能出手相助。这里不胜感谢！！