将值保存到stringcollection中的设置

Question

我想将文本框中的所有用户输入保存到设置中的字符串集合 这是我的代码，但是无法正常工作，我无法弄清楚为什么？

  Sub LoadingData()
    '' add all textbox names here whose value you want to persist.
    For Each TBox() As TextBox In Me.Panel1.Controls
        With My.Settings
            If .savetxt Is Nothing Then .savetxt = New System.Collections.Specialized.StringCollection
            For i = 0 To TBox.Length - 1
                If .savetxt.Count <= i Then .savetxt.Add("")
                TBox(i).Text = .savetxt(i)
            Next
        End With

    Next
End Sub
Sub SavingData()
    For Each TBox() As TextBox In Me.Panel1.Controls
        For i = 0 To TBox.Length - 1
            My.Settings.savetxt(i) = TBox(i).Text
        Next
    Next
    My.Settings.Save()
End Sub

谢谢

Answer 1

如果您希望使用无代码解决方案...

1. 转到表单设计器。选择一个文本框。

2. 在“属性”窗口中，选择（ApplicationSettings）左侧的加号。 （在最顶部）

3. 单击空白的（PropertyBinding）框，单击省略号按钮（...）。

4. 选择属性，在这种情况下为Text。单击下拉箭头；然后是New ...

5. 给出一个简单但唯一的名称，也许是t1（然后是t2，则表示下一个TextBox，依此类推），然后选择一个范围。单击确定，然后单击确定。

您的全部设置。属性窗口中的“文本”属性将出现一个小图标。将鼠标悬停在该位置上会告诉您该属性已绑定到名为t1的设置。 Text属性将自动保存和加载。