[VB.NET] StringCollection w My.Settings

W ustawieniach programu Settings, można dane typów m. in. String, Integer, Char a nawet Color. Nie można jednak zapisać tablicy stringów. Jeśli zajdzie kiedyś taka potrzeba, w zamian tego można użyć typu StringCollection.

Jak zamienić dane typu tablica stringów na kolekcję stringów i odwrotnie?

'Dodaj referencję na początku pliku
Imports System.Collections.Specialized

'Tablica na Kolekcję
Dim strArray() As String = {"dog", "cat", "fish"}
Dim strCollection As StringCollection = New StringCollection()

strCollection.AddRange(strArray)

'Kolekcja w tablicę
Dim strCollection As StringCollection = New StringCollection()

strCollection.Add("one")
strCollection.Add("two")
strCollection.Add("three")

'tworzymy tablicę wielkości kolekcji
Dim strArray(strCollection.Count) As String

'kopiujemy zawartość kolekcji do tablicy,
'wrzucają elementy w tablicy od indexu 0
strCollection.CopyTo(strArray, 0)

Tworzymy teraz pole w Settings o nazwie settingSC. Gdy chcemy zapisać naszą kolekcję do ustawień, bądź wczytać ją do ustawień, używamy takie prostego kodu:

'Zapisanie ustawień do pola settingSC
My.Settings.settingSC = strCollection

'Wczytanie z pola settingSC do kolekcji
strCollection = My.Settings.settingSC

Teraz gdy potrzebne nam to jako tablica stringów możemy prosto to przekonwertować używając kodu powyżej.