0

コードを最適化しようとしています。具体的にはこのプロセス

  1. 場所のグループを計算します (基本的にはグリッド上の正方形)
  2. 計算されたすべての場所のリストを持っている
  3. 次に、これらすべての場所を一度に 1 つずつ調べます。

私が抱えている問題は、リストに重複する場所を削除するか、含めないことです。整数 (場所を表す整数) のリストを作成しようとしましたが、それでも非常に遅いです。数字の概要を説明すると、少なくとも 15,000 の異なる位置計算と約 1,000,000 の可能な位置について話している.

これに関する助けがあれば大歓迎です！

4

1 に答える 1

0

文字列配列から重複を削除する方法は次のとおりです。おそらくそれはあなたの助けになるでしょう：

  Dim OneDimensionalTable(1000) As String

  ....

  OneDimensionalTable = RemoveDuplicates(OneDimensionalTable)

  .....


 Private Function RemoveDuplicates(ByVal items As String()) As String()

    Dim noDupsArrList As New ArrayList()
    For i As Integer = 0 To items.Length - 1
        If Not noDupsArrList.Contains(items(i).Trim()) Then
            noDupsArrList.Add(items(i).Trim())
        End If
    Next

    Dim uniqueItems As String() = New String(noDupsArrList.Count - 1) {}
    noDupsArrList.CopyTo(uniqueItems)
    Return uniqueItems

End Function
于 2013-03-19T02:08:25.673 に答える