读取EXECL文件时，一些文本格式的数字，如电话号码无法读取，请问是什么原因？

代码如下：

    Dim mg As new Merger
    With mg
        .Format = "Excel"
        .SourcePath = SourceFile
        .SourceTableName = DestTableName & "$"
        .DataTableName = DestTableName
        .Header = True
        For Each dc As DataCol In DataTables(DestTableName).DataCols
            If dc.Caption <> ""
                .FieldMaps.Add(dc.Caption,dc.Name) \'若列标题存在，则将列标题对应的字段，合并到列名对应的接收列
            End If
        Next
        .Merge
    End With