第一种最没效率的~用UltraEdit的手动转~太不自动所以不合格~
第二种稍微没效率的~写VB的代码自动转~但是档案太大可能引发内存直接爆掉~一定要改写法~切割档案分批转~但没效率又麻烦~所以目前暂时不予采用~
http://www.
程序代码:
Sub TransFileFormat(FileName As String) Dim n As Integer, i As Long, total As Long Dim InString(60000) As String total = 0 n = FreeFile Open FileName For Input As #n Do While Not EOF(n) total = total + 1 Line Input #n, InString(total) InString(total) = Replace(InString(total), Chr(10), vbCrLf) Loop Close #n n = FreeFile Open FileName For Output As #n For i = 1 To total Print #n, InString(i) Next Close #n End Sub
第三种应该很有效率的~听说C内建函式可以转过去而且很快~只要改成DLL档~再用VB中去呼叫来用就行了~这我有经验~嘿嘿~
明天有机会再试了~