如何删除My.Settings数据

Question

我将4个对象设置为MySettings (Usr1、Usr2、Usr3、Usr4)为System.Collections.Specialized.StringCollection。

我以这样的方式给予它价值(而且它是有效的)：

For x As Integer = 1 To 4
    If My.Settings.Item("Usr" & x.ToString) Is Nothing Then
        My.Settings.Item("Usr" & x.ToString) = New System.Collections.Specialized.StringCollection _
            From {Me.TBox_Name.Text, _
                  Me.Tbox_Surname.Text, _
                  Me.TBox_City.Text, _
                  Me.CBox_Age.Text}
        My.Settings.Save()
        Saved = True
        Exit For
    End If
Next

当我试图删除记录并将对象设置为空时，我无法匹配

这就是我所尝试的：

Dim ToDelete = New System.Collections.Specialized.StringCollection _
            From {Me.TBox_Name.Text, _
                  Me.Tbox_Surname.Text, _
                  Me.TBox_City.Text, _
                  Me.CBox_Age.Text}
If Not My.Settings.Usr1 Is Nothing AndAlso My.Settings.Usr1.Equals(ToDelete) Then
    My.Settings.Usr1 = Nothing
End If
If Not My.Settings.Usr2 Is Nothing AndAlso My.Settings.Usr2.Equals(ToDelete) Then
    My.Settings.Usr2 = Nothing
End If
If Not My.Settings.Usr3 Is Nothing AndAlso My.Settings.Usr3.Equals(ToDelete) Then
    My.Settings.Usr3 = Nothing
End If
If Not My.Settings.Usr4 Is Nothing AndAlso My.Settings.Usr4.Equals(ToDelete) Then
    My.Settings.Usr4 = Nothing
End If

，但我从来没有找到平等:没有匹配。

我试着从设置中获取值并将它们放入文本框中。因此，我确信文本框中的值与我的设置相等，但我的代码不认识它。

我哪里错了？

还有别的办法吗？

Answer 1

这是一个简单的命令。

My.Settings.Usr1.Clear()