如何在Visual Basics中更改字符串中的字符,例如(1到0)和(0到1)?

时间:2015-07-20 22:31:58

标签: vb.net binary flip

如何在Visual Basics中更改字符串中的字符(例如1到0) 和(0到1)没有问题,首先将它们全部更改为0,然后全部更改为1,我想得到一个结果,例如像#34; 00110010101101001010"到" 11001101010010110101" (翻转它)

3 个答案:

答案 0 :(得分:2)

使用中间值。

Change all 0 -> 2
Change all 1 -> 0
Change all 2 -> 1

答案 1 :(得分:1)

这个怎么样:

    Dim text = "00110010101101001010"
    Dim flipped = New String(text.Select(Function(c) If(c = "0"c, "1"c, "0"c)).ToArray())

这让我:

11001101010010110101

答案 2 :(得分:0)

另一种选择是将字符串转换为字符数组,逐个迭代每个字符;然后从修改后的数组中构建一个新字符串(或覆盖原始字符串):

    Dim data As String = "00110010101101001010"
    Dim arr() As Char = data.ToCharArray
    For i As Integer = 0 To arr.Length - 1
        arr(i) = If(arr(i) = "1", "0", "1")
    Next
    Dim data2 As New String(arr)
    Debug.Print(data)
    Debug.Print(data2)