Finding minimum in array

draganmit · April 28th, 2005, 03:21 PM

If I declare : Dim myArray() As Double, how can i find minimum in this array if i'm looking for date??
For example: array must contain date of birth and im looking for oldest person in array.
I'm using textboxes to fill the array.
Please help me!!!!

gbianchi · April 28th, 2005, 03:59 PM

hi there..

first of all.. if you are using dates declare it like dates ;)

second.. start with a value (for example today if you are looking for older dates) and then go through all the array, cheking if the date if older than what you have, and if it is then replace the one you have..

HTH

Gonzalo

draganmit · April 28th, 2005, 05:04 PM

Thanks for your time but how can i compare dates?
I have Structure "Person" with 3 element.2 strings and date,then i declared array(Dim array() As Person).I need to fill it with 5 persons with textboxes(txtFirstname,txtLastname,txtDate)Then i'm looking for oldest person in this array and longest first and last name.This is what i was looking for.
If you know how can i do this please tell me!
thanks...

gbianchi · April 28th, 2005, 05:09 PM

hi there..

use this...

DateTime.op_LessThan(t1, t2)

where t1 and t2 are datetime objects

true if t1 is less than t2; otherwise false...

HTH

Gonzalo

draganmit · April 28th, 2005, 05:15 PM

you don't understand me:)
I have 5 persons with 5 diferent dates of birth.
I need to find the oldest one in array.
I think i cleared this up to you.
now can you help me?

Hal Levy · April 28th, 2005, 05:31 PM

You are going to have to do what you are trying to avoid- Loop through the list and find the date that's lowest.

Hal Levy
I am here to help you, not do it for you.
That is, unless you hire me. I am looking for work.

BrianWren · April 29th, 2005, 10:27 AM

I believe you can compare dates directly, using standard comparison operators.

Letâs say you have

Code:

    Dim tmpDate As Date

and your array, arr(), is loaded with simple dates (and is declared as an array of Dates). Let's further assume the number of elements is not more than an Integer can ID (a pretty safe assumption). Then, to ID the oldest:

Code:

    Dim i        As Integer
    Dim OldestID As Integer
    Dim tmpDate  As Date

    i = LBound(arr)
    OldestID = i    ' If no older dateâs found, youâll end up with this.

    For i = LBound(arr) + 1 To UBound(arr)
        If arr(i) > arr(OldestID) Then
            OldestID = i
        End If
    Next i

Now Oldest ID is pointing to the oldest date, if there were no duplicates, or the first of the duplicates if there are any.

Does that help?

mehdi62b · April 29th, 2005, 10:56 AM

draganmit,

you should implement IComparable in your person class,

take a look at this thread,it has a student class it implements IComparable..

I think it could give you the idea.

keep in touch.

_____________
Mehdi.
software student.