Collections and Classes

[jadox]

Hi,

Can anyone help me with this?

I have a class, lets say with Name, Address and Salary properties. And a Collection (Employees) with all the classes.

Is there a way to search for the maxvalue of the Salary, from all the classes in the collection?

Thanks!

 

[Domenic]

Try something like this...

<font face=Calibri>    <SPAN style="color:#00007F">Dim</SPAN> Employees       <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">New</SPAN> Collection<br>    <SPAN style="color:#00007F">Dim</SPAN> cEmp            <SPAN style="color:#00007F">As</SPAN> clsEmp<br>    <SPAN style="color:#00007F">Dim</SPAN> sEmployee       <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">String</SPAN><br>    <SPAN style="color:#00007F">Dim</SPAN> MaxSalary       <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Double</SPAN><br>    <br>    <SPAN style="color:#007F00">'Your code to store class objects in your collection</SPAN><br>    <br>    MaxSalary = 0<br>    <SPAN style="color:#00007F">For</SPAN> <SPAN style="color:#00007F">Each</SPAN> cEmp <SPAN style="color:#00007F">In</SPAN> Employees<br>        <SPAN style="color:#00007F">If</SPAN> cEmp.Salary > MaxSalary <SPAN style="color:#00007F">Then</SPAN><br>            MaxSalary = cEmp.Salary<br>            sEmployee = cEmp.Name<br>        <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">If</SPAN><br>    <SPAN style="color:#00007F">Next</SPAN> cEmp<br>    <br>    MsgBox "Employee:  " & sEmployee & "; Salary:  " & MaxSalary<br>    </FONT>

Hope this helps!

 

[jadox]

Thanks, this works fine!

 

[Domenic]

You're very welcome!