Текстовый формат UNIX: Как быстро идентифицировать такой тип файлов - VB

Формулировка задачи:

Посмотрите программу:TEST0014.zip и попробуйте загрузить в неё два файла:

ndv-txt-13-10.gb

- загружается нормально, это текстовый файл того типа которым обычно пользуемся,

ndv-txt-10.gb

- загружается не корректно это текстовый файл который загружается с GenBankhttp://www.ncbi.nlm.nih.gov/

National Center for Biotechnology Information

Это не было бы проблемой если этот файл можно загрузить в одну строку, но обычно эти файлы бывают размером от 20Mb до 40Mb (иногда и больше, но редко) и программа в режиме файла последовательного доступа открыть их не может.

Вопросы:

1. Как быстро идентифицировать такой тип файлов? 2. Как конвертировать в обычный текстовый файл? Пока что решаем эту проблему так:

FAR (F4, Shift+F2, Save as DOS text)

Какие-нибудь идеи будут?

Решение задачи: «Текстовый формат UNIX: Как быстро идентифицировать такой тип файлов»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Function sLeftCut$(ByRef sT$, ByVal Delim$)
  Dim pos&
  pos = InStr(sT, Delim)
  sLeftCut = Left$(sT, pos)
  sT = Right$(sT, Len(sT) - pos)
End Function