主题：关于字符串中的双引号的判断

Dim Str1 As String = e.DataRow("part_spec")
        If Str1.Contains(""") Then ' 如果文本中包含双引号如:12356"456"
            Str1=Str1.Replace(""","""") ' 那么文本变成:12356""456""
            e.DataRow("part_spec") =Str1
        End If

请问以上代码应该如何写才正确呢?