Не могли бы вы сделать все свои настройки в массив строк My.Settings.swed(10)
, чтобы вы могли просматривать их, как вы предлагаете.
Я не уверен, что цикл For Each
правильный.
Dim My.Settings.swed(10) As String
For i = My.Settings.swed.LBound To My.Settings.swed.UBound
web(i) = My.Settings.swed(i)
Next
Если у вас есть For Each
, то обычно над каждым членом коллекции