0

辞書をそのように設定した場合：

set myDict = CreateObject("Scripting.Dictionary")

ユーザーに名前を尋ねます。

Wscript.StdOut.WriteLine "What is your name: "
name = Wscript.StdIn.ReadLine

次に、ユーザーに 5 つの数字を尋ねます。

Wscript.StdOut.WriteLine "Enter a number: "
    num1 = cint(Wscript.StdIn.ReadLine)
Wscript.StdOut.WriteLine "Enter a number: "
    num2 = cint(Wscript.StdIn.ReadLine)
Wscript.StdOut.WriteLine "Enter a number: "
    num3 = cint(Wscript.StdIn.ReadLine)
Wscript.StdOut.WriteLine "Enter a number: "
    num4 = cint(Wscript.StdIn.ReadLine)
Wscript.StdOut.WriteLine "Enter a number: "
    num5 = cint(Wscript.StdIn.ReadLine)

ArrayListを使用して、5 つのプロンプト番号を任意の配列に配置します。

Set myArrayList = CreateObject( "System.Collections.ArrayList" )
myArrayList.Add num1
myArrayList.Add num2
myArrayList.Add num3
myArrayList.Add num4
myArrayList.Add num5

name設定した辞書にキーを追加すると。

myDict.Add name

以前に設定した辞書にmyArrayList値として追加できますか?namemyDict

myArrayListもしそうなら、5つの数字の質問をループする場合、どのように追加または追加できますか?

4

1 に答える 1

1

ディクショナリの値は、次のように、プリミティブ値だけでなく、配列またはオブジェクト ( などArrayList) にすることもできます。

myDict.Add name, myArrayList

またはこのように：

Set myDict(name) = myArrayList

オブジェクトを名前で選択して操作できます。次の例では、値 42 を新しい要素として配列リストに追加します。

myDict(name).Add 42

新しい (空の) 配列リストを辞書に入れ、後で数値を追加することもできます。

Set myDict(name) = CreateObject("System.Collections.ArrayList")
Wscript.StdOut.WriteLine "Enter a number: "
myDict(name).Add CInt(WScript.StdIn.ReadLine)
...
于 2015-12-10T16:19:03.750 に答える