Groups > microsoft.public.scripting.vbscript > #11223

Re: Return a key, value pair from a "for each" loop.

Newsgroups	microsoft.public.scripting.vbscript
Date	2016-01-26 17:13 -0800
References	<56a75878$0$23745$e4fe514c@news.xs4all.nl>
Message-ID	<2b36d537-18b8-4610-9eaa-46d13bc8fa35@googlegroups.com> (permalink)
Subject	Re: Return a key, value pair from a "for each" loop.
From	ttanaka@cybernet.co.jp

Show all headers | View raw

You can use Scripting.Dictionary object:

    Dim aList
    Set aList = CreateObject("Scripting.Dictionary")
    aList.Add "a", "123"
    aList.Add "b", "456"
    aList.Add "c", "789"

    Dim sKey
    For Each sKey In aList.Keys
      Dim sValue
      sValue = aList(sKey)
      WScript.Echo "key : [" & sKey & "], value = [" & sValue & "]"
    Next

2016年1月26日火曜日 20時29分41秒 UTC+9 R.Wieser:
> Hello all,
> 
> Is there, and what is the format of, a "for each" loop which returns TWO
> results (key and its associated value) at the same time.   In PHP I would
> use " foreach ($aList as $sKey => $sValue)".  Is there something equivalent
> in/under VBScript ?
> 
> Remark: I'm not looking for the dictionary object.   I know that one.  It
> does not have it either. :-)
> 
> (Full disclosure: I'm implementing a IEnumVariant object)
> 
> Regards,
> Rudy Wieser

Back to microsoft.public.scripting.vbscript | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-26 12:31 +0100
  Re: Return a key, value pair from a "for each" loop. "Evertjan." <exxjxw.hannivoort@inter.nl.net> - 2016-01-26 12:54 +0100
    Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-26 14:18 +0100
      Re: Return a key, value pair from a "for each" loop. "Evertjan." <exxjxw.hannivoort@inter.nl.net> - 2016-01-26 14:42 +0100
        Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-26 15:27 +0100
          Re: Return a key, value pair from a "for each" loop. "Evertjan." <exxjxw.hannivoort@inter.nl.net> - 2016-01-26 17:08 +0100
            Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-26 18:44 +0100
  Re: Return a key, value pair from a "for each" loop. "Mayayana" <mayayana@invalid.nospam> - 2016-01-26 08:26 -0500
    Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-26 16:41 +0100
  Re: Return a key, value pair from a "for each" loop. JJ <jj4public@vfemail.net> - 2016-01-27 01:01 +0700
    Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-26 20:41 +0100
      Re: Return a key, value pair from a "for each" loop. JJ <jj4public@vfemail.net> - 2016-01-27 16:56 +0700
        Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 13:16 +0100
          Re: Return a key, value pair from a "for each" loop. JJ <jj4public@vfemail.net> - 2016-01-28 04:16 +0700
            Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-28 00:17 +0100
            Re: Return a key, value pair from a "for each" loop. "Evertjan." <exxjxw.hannivoort@inter.nl.net> - 2016-01-28 00:22 +0100
              Re: Return a key, value pair from a "for each" loop. JJ <jj4public@vfemail.net> - 2016-01-28 16:03 +0700
                Re: Return a key, value pair from a "for each" loop. "Evertjan." <exxjxw.hannivoort@inter.nl.net> - 2016-01-28 11:59 +0100
  Re: Return a key, value pair from a "for each" loop. GS <gs@v.invalid> - 2016-01-26 18:10 -0500
    Re: Return a key, value pair from a "for each" loop. GS <gs@v.invalid> - 2016-01-26 18:12 -0500
    Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 11:33 +0100
      Re: Return a key, value pair from a "for each" loop. GS <gs@v.invalid> - 2016-01-27 12:27 -0500
        Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 19:42 +0100
          Re: Return a key, value pair from a "for each" loop. GS <gs@v.invalid> - 2016-01-27 14:36 -0500
            Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 23:34 +0100
              Re: Return a key, value pair from a "for each" loop. GS <gs@v.invalid> - 2016-01-27 18:13 -0500
                Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-28 09:49 +0100
  Re: Return a key, value pair from a "for each" loop. Ulrich Möller <knobbi38@arcor.de> - 2016-01-27 01:30 +0100
    Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 11:40 +0100
      Re: Return a key, value pair from a "for each" loop. Ulrich Möller <knobbi38@arcor.de> - 2016-01-27 15:08 +0100
        Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 15:51 +0100
  Re: Return a key, value pair from a "for each" loop. ttanaka@cybernet.co.jp - 2016-01-26 17:13 -0800
    Re: Return a key, value pair from a "for each" loop. "Mayayana" <mayayana@invalid.nospam> - 2016-01-26 21:28 -0500
      Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 12:41 +0100
        Re: Return a key, value pair from a "for each" loop. "Evertjan." <exxjxw.hannivoort@inter.nl.net> - 2016-01-27 12:44 +0100
          Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 13:21 +0100
    Re: Return a key, value pair from a "for each" loop. "R.Wieser" <address@not.available> - 2016-01-27 11:43 +0100

csiph-web