Cuestión de promedios

Respondiendo a una consulta sobre el anterior post de como sacar promedios de cadenas representando valores numéricos y provenientes de una lista, ‘combobox’ o cualquier otro origen en texto :


Dim Consumo As Integer = 0
Dim Consumos = {“10”, “11”, “21”, “31”, “41”}
Console
.WriteLine((Array.ConvertAll(Consumos,
                                    Function(s) If(Integer.TryParse(s, Consumo), Consumo,
                                                  
New Integer))).Average)

Espero que os sea practico,
Pep Lluis,

Leave a Reply

Your email address will not be published. Required fields are marked *

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>