主题：[求助]批量合并文本-再次求助

批量合并正常，现在求助：其中一列[股piao代码]的内容（'600207），想在合并的时候，去掉这个“'”符号，只要（600207），请前辈指教，谢谢。

For Each File As String In Filesys.GetFiles(projectpath & "下载数据")
    If File.EndsWith(".txt") '如果后缀名是txt,说明此文件是文本格式
        FileSys.WriteAllText(file, FileSys.ReadAllText(file,encoding.default).Replace("None", 0), False, encoding.default)
        Dim mg As New Merger
        mg.Format = "Delimited" '指定格式为文本格式
        mg.SourcePath = FileSys.GetParentPath(file) '指定要合并的数据文件,含路径
        mg.SourceTableName = FileSys.GetName(file).SubString(0,6) '指定要合并的文件,无需扩展名
        mg.DataTableName = "历史数据" '指定接收合并数据的数据表的名称
        mg.Fields = "日期,股piao代码,开盘价,最高价,最低价,收盘价"
        mg.Merge()
    End If
Next
DataTables("历史数据").StopRedraw
For Each dr As DataRow In DataTables("历史数据").DataRows
    dr("股piao代码") = dr("股piao代码").replace("'", "")
Next
DataTables("历史数据").ResumeRedraw

谢谢甜版，晚上还回复，辛苦你啦！