Worst case means that the array is already sorted in reverse order from the required. Worst Case Function just loop from max to min to create a sorted array in descending order
Worst Case Function
Public Sub WorstCase( ByRef arr(), Byval nSize )
Dim i, nCount
Redim arr( nSize - 1 )
nCount = 0
For i = UBound( arr ) To LBound( arr ) Step - 1
arr( nCount ) = i + 1
nCount = nCount + 1
Next
End Sub
Posted in Arrays

daniva




September 9th, 2008 at 3:47 pm
This is waste
September 9th, 2008 at 3:51 pm
Sorry for the previous comment great work