[AccessD] Count the occurrences of each character in a string

Stuart McLachlan stuart at lexacorp.com.pg
Tue Sep 6 16:44:11 CDT 2022


AFAIK, There is no VBA dictionary.

You need to include a Reference to the MS Scripting Library to have a dictionary in Access.


On 6 Sep 2022 at 11:11, Arthur Fuller wrote:

> Thanks, Jim.
> I'll give that approach a try too just to learn something new about
> VBA dictionaries.
> 
> On Mon, Sep 5, 2022 at 1:33 PM James Button via AccessD <
> accessd at databaseadvisors.com> wrote:
> 
> > VBA dictionary
> > For each character get the hex (or decimal) value
> > And in a dictionary create a key with that value and set it to 1, Or
> > if the key exists, increment it's value.
> >
> > Entries are presented sorted in key order, so saves the definition
> > count processing, and sorting etc. needed with an array.
> >
> > Note using the char() function for the key means the process is case
> > sensitive.
> >
> > JimB
> >
> > -----Original Message-----
> > From: AccessD
> > <accessd-bounces+jamesbutton=blueyonder.co.uk at databaseadvisors.com>
> > On Behalf Of Paul Hartland via AccessD Sent: Monday, September 5,
> > 2022 10:05 AM To: Access Developers discussion and problem solving
> > <accessd at databaseadvisors.com> Cc: Paul Hartland
> > <paul.hartland at googlemail.com> Subject: Re: [AccessD] Count the
> > occurrences of each character in a string
> >
> > Off the top of my head I would use something like a two dimensional
> > array, then loop through the word letter by letter, if already in
> > the array add 1 if not add it to the array with 1 as the value, so
> > yourarray(0,0) = 'M' and yourarray(0,1) = 1
> >
> > Etc etc then do what you like with the array.
> >
> > Very busy at work at moment but if you need an example let me know
> > and will knock one up in about 9 hours time after work
> >
> > Paul
> >
> > Paul
> >
> > On Mon, 5 Sep 2022, 09:43 Arthur Fuller, <fuller.artful at gmail.com>
> > wrote:
> >
> > > I'm trying to figure out the best way to count the occurrences of
> > > each character in a string. Sample string: "mississipi" I should
> > > get back an array looking like this:
> > >
> > > Character Count
> > > m 1
> > > i 4
> > > s 4
> > > p 1
> > >
> > > Any suggestions?
> > >
> > > --
> > > Arthur
> > > --
> > > AccessD mailing list
> > > AccessD at databaseadvisors.com
> > > https://databaseadvisors.com/mailman/listinfo/accessd
> > > Website: http://www.databaseadvisors.com
> > >
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > https://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > https://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> 
> 
> -- 
> Arthur
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> https://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 




More information about the AccessD mailing list