03-23-2006 04:12 PM
03-24-2006 01:49 AM
Hi Jim
In DIAdem you have the command ChnMultipleSort to sort DIAdem channels. To sort a field you find a lot of scripts in the internet e.g. the bubblesort algorithms. The following script sorts an array. It works good, if the array is not to big.
Function bubblesort(arrSort)
Dim iTemp, j, arrTemp
For iTemp = 0 to ubound(arrSort)
For j = iTemp + 1 to ubound(arrSort)
If UCase(arrSort(iTemp)) > UCase(arrSort(j)) Then
arrTemp = arrSort(iTemp)
arrSort(iTemp) = arrSort(j)
arrSort(j) = arrTemp
End If
Next
Next
bubblesort = arrSort
End Function
Hope this helps
Winfried
03-24-2006 07:41 AM