0

私はMy.Settingsに保存されたArrayListを持っています私はいくつかの文字列を使用してそれにアクセスしようとしています、これが私がやろうとしていることを取得するためのコードです

If listBoxEdit1.SelectedIndex > -1 Then
        My.Settings("Sup" & listBoxEdit1.SelectedIndex + 1 & "(1)") = Convert.ToDouble(Margin2TextBox.Text)
    End If

My.Settings.Sup1（1）の値を指定する必要があります

どうしますか？

My.Settings.Sup1からMy.Settings.Sup20までの複数listBoxEdit1.SelectedIndex+1のArrayListがあるので、はArrayListの番号を指定しますが、インデックスを取得する方法がわかりません。

また試した

My.Settings("Sup" & listBoxEdit1.SelectedIndex + 1 &"("& 1 & ")")

また

My.Settings("Sup" & listBoxEdit1.SelectedIndex + 1).Item(1)
4

1 に答える 1

0

StringCollection設定のタイプとして選択します。

ここに画像の説明を入力してください

次に、インデックスを使用して特定の要素に簡単にアクセスできます。

Dim setting As StringCollection = My.Settings.MySetting
Dim value1 = My.Settings.MySetting(1)
Dim value2 = My.Settings.MySetting(2)
Dim valueX = My.Settings.MySetting.Item(X)

編集

設定が呼び出された場合は、またはMy.Settings（ "Sup"など）Sup1を介してアクセスできます。My.Settings("Sup1")次に、あなたはあなたのArrayListまたはを持っており、他のすべてのまたはStringCollectionのようにそのアイテムにアクセスできます。ArrayListStringCollection

したがって、コードはおそらく次のようになります。

 My.Settings("Sup" & listBoxEdit1.SelectedIndex + 1)(1) = Convert.ToDouble(Margin2TextBox.Text)

別の例を次に示します。

My.Settings.MySetting1 = New StringCollection()

My.Settings("MySetting" & 1).Add("FooBar")
My.Settings("MySetting" & 1).Add("123456")

My.Settings("MySetting" & 1)(0) = "Hey, what's up?"

MsgBox(My.Settings("MySetting" & 1)(1))
于 2012-08-21T06:58:41.167 に答える