用两个数组进行比较,
Dim a() As Int16 = {1, 2, 3, 3, 4, 5, 5, 5}
Dim al As ArrayList
Dim b As Boolean
al = New ArrayList()
al.Add(a(0))
Dim i, j As Integer
For i = 1 To 7
b = False
For j = 0 To al.Count - 1
If a(i) = al(j) Then
b = True
Exit For
End If
Next
If b = False Then
al.Add(a(i))
End If
Next
For j = 0 To al.Count - 1
Response.Write(al(j))
Next
Dim a() As Int16 = {1, 2, 3, 3, 4, 5, 5, 5}
Dim al As ArrayList
Dim b As Boolean
al = New ArrayList()
al.Add(a(0))
Dim i, j As Integer
For i = 1 To 7
b = False
For j = 0 To al.Count - 1
If a(i) = al(j) Then
b = True
Exit For
End If
Next
If b = False Then
al.Add(a(i))
End If
Next
For j = 0 To al.Count - 1
Response.Write(al(j))
Next
谢谢,我的做法跟你差不多,是解决了。
不过.net类库如此丰富,我在猜有没有一个"类的方法"可以直接处理。(嘿、是懒了点^_^)