VB.net - Listbox find&替换一次

时间:2014-11-20 16:05:19

标签: vb.net visual-studio-2010

我有点问题。我试图找到&替换我的列表框项目。我的代码运行良好,但是如果我再次运行我的代码,那么我得到了#34;复制"。

实施例: 东西:[空格] 我再次点击我的按钮。我的代码再次运行。我得到: 东西:[空间]:[空间]

我不想要它。只需更换一次即可完成。

For i = 0 To ListBox2.Items.Count - 1
            If ListBox2.Items(i).ToString.Contains("something") Then
                ListBox2.Items(i) = ListBox2.Items(i).ToString.Replace("something", "something: ")
            End If

        Next

谢谢!

1 个答案:

答案 0 :(得分:0)

如果你只是检查"某些东西",它总会在它的末尾添加冒号,除非你还检查"某事:"。

    For i = 0 To ListBox2.Items.Count - 1
        If ListBox2.Items(i).ToString.Contains("something") AndAlso Not ListBox2.Items(i).ToString.Contains("something:") Then
            ListBox2.Items(i) = ListBox2.Items(i).ToString.Replace("something", "something: ")
        End If
    Next