realbasic-nug.it
[Top] [All Lists]

Re: Ripetizione di elementi in arrays

To: REALbasic NUG Italian <realbasic-nug dot it at lists dot realsoftware dot com>
Subject: Re: Ripetizione di elementi in arrays
From: Gualeni Giovanni <ggualeni at tiscali dot it>
Date: Sat, 6 May 2006 19:44:41 +0200
Delivered-to: realbasic-nug dot it at lists dot realsoftware dot com
References: <3B0909D1-B394-4BE3-A52B-9F82813F0AFC at ticino dot com> <44b48eef58e18d1d870a416fd604fd6e at libero dot it> <ac9b413d5faac6051302e3ee588c77f2 at libero dot it> <11B0E387-B7EE-4A8C-9D67-960961B11082 at ticino dot com> <C2B5DF69-4DAF-4B38-8F44-702C73BD1C17 at tiscali dot it> <C301F803-A27F-4F7C-BA59-1F9F50E78BF5 at darkworks dot it> <826AAD65-8744-41F6-8596-71EE711C840B at tiscali dot it>
Il giorno 06/mag/06, alle ore 19:36, Gualeni Giovanni ha scritto:

Function CountOccurrencies(entries() as String) As Dictionary
  Dim occurrencies as New Dictionary
  Dim entry as String

  for each entry in entries
    occurrencies.Value(entry) = occurrencies.Lookup(entry,0) + 1
  next

  Return occurrencies
End Function

Scusa ma questa funzione dove la trovi?

Giovanni

Scusate, sono un po' perso. Devo farmela (la funzione intendo).

Giovanni


<Prev in Thread] Current Thread [Next in Thread>