realbasic-nug
[Top] [All Lists]

Re: Suggestions for Comparing Data

To: REALbasic NUG <realbasic-nug at lists dot realsoftware dot com>
Subject: Re: Suggestions for Comparing Data
From: Joe Strout <joe at inspiringapps dot com>
Date: Tue, 30 Oct 2007 20:06:34 -0600
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug at lists dot realsoftware dot com
References: <4727C089 dot 70101 at stny dot rr dot com> <FF5E4776-FFFF-4743-A71E-83076F0E8B88 at declareSub dot com>
On Oct 30, 2007, at 5:54 PM, Charles Yeomans wrote:

>    if d.HasKey(s) then
>      d.Value(s) = d.Value(s).IntegerValue + 1
>    else
>      d.Value(s) = 1
>    end if

Or even more simply:

    d.Value(s) = d.Lookup(s,0).IntegerValue + 1

Cheers,
- Joe

--
Joe Strout
Inspiring Applications, Inc.
http://www.InspiringApps.com



_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>


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