Как узнать кол-во строк в текстовом файле?

[TAlex]

Есть текстовый файл, как можно узнать кол-во строк в нем, не считывая их (не используя Line Input). FileLen тоже не подходит - все строки разной длины.

[RayShade]

Нельзя приготовить омлет, не разбив яиц.

[v-adix]

как ты узнаешь кол-во строк, НЕ считывая их?
используй или line input или vbcrlf

[Mikle]

Ну можно еще посчитать символы переноса строки chr(10), chr(13), только будет ли быстрее?

[Ducis]

Если не хочется считывать по строкам, то считай весь файл, а потом так:
кол_во_строк=(len(filetext)-len(replace(filetext,vbcrlf,"")))/2+1
Только есть особенность - некоторые проги оптимизации веб страниц вместо vbcrlf (chr(10), chr(13)) оставляют только один символ переноса каретки.

[v-adix]

вот именно, что символы переноса это vbcrlf. только быстрее вряд ли будет

[Ducis]

вот именно, что символы переноса это vbcrlf. только быстрее вряд ли будет

Скорость будет зависеть от размера файла. Например если в VB считывать файл побайтно, то это будет гемморой. Лучше считывать кусками а потом разбирать побайтно. Просто в VB немного коряво реализована работа с буфером.
А vbcrlf это два символа - перевод строки vbLf (Chr(10)) и возврат каретки vbCr (Chr(13)). При нажатии Enter вводятся сразу оба. А в текстовом файле можно оставить только перевод строки и уменьшить размер ф-ла. Как я уже говорил выше, таким приемом пользуются оптимизаторы Web страниц при оптимизации кода скриптов в которых нельзя совсем выкинуть оба символа vbcr & vblf.