串2个单引号 - 从字符串

Question

所以我有一点机管局发行除去撇号之一....

我有一个字符串，它看起来像这样...

O''Neil 

有一种方法来删除一个撇号？基本上，我想将其转换回

O'Neil 

Answer 1

希望这可以帮助你： 注意 - 我离开了错误处理给你。

Imports System 

Public Module Module1 
    Public Sub Main() 

     Dim data As String = "O''Neil" 

     Dim in1 As Integer = data.IndexOf("'"C) ' get the index of first quote 
     Dim in2 As Integer = data.IndexOf("'"C, in1 + 1) ' get the index of second  
     Dim result As String = data.Remove(in2, 1) ' remove the second quote 

     Console.WriteLine(result) 
    End Sub 
End Module