Подсчитать кол-во строк в файле и перескочить на др. label

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
bashobn
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 25.05.2008 (Вс) 10:37

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение bashobn » 16.01.2009 (Пт) 12:53

в ту же папку

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 16.01.2009 (Пт) 19:40

Короче, впихнул в папку с программой все файлы, которые включил в архив Бейсиковский упаковщик. Теперь работает на любой машине. А архив сделал через InnoSetup - в.т.ч. впихнул в него все эти библиотеки, файлы и саму программу.

Всем спасибо за помощь!

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 18.01.2009 (Вс) 14:51

А есть ли в ListBox какие-нибудь стандартные сортировки? (Есть же в C++ сортировка по алфавиту, причем выполняется она одной командой)

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 18.01.2009 (Вс) 14:51

И еще: есть ли все-таки MSDN на русском?

iGrok
Артефакт VBStreets
Артефакт VBStreets
 
Сообщения: 4272
Зарегистрирован: 10.05.2007 (Чт) 16:11
Откуда: Сетевое сознание

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение iGrok » 18.01.2009 (Вс) 15:11

zusicks438 писал(а):И еще: есть ли все-таки MSDN на русском?

Считай, что нет. У всего, что есть сильно страдает актуальность.
label:
cli
jmp label

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 19.01.2009 (Пн) 21:10

iGrok, спасибо.
Так есть ли в ListBox какие-нибудь стандартные сортировки?

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 19.01.2009 (Пн) 21:14

Все, нашел, извините за флуд.

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 20.01.2009 (Вт) 19:58

Гммм... А как вычислить строку в файле с нужным тебе номером?
Например, мне нужно закинуть в переменную txtStr строку под номером 12 от начальной строки файла. Что я должен сделать?
И как вообще определить сколько всего строк в файле?

Понимаю, что уже всем надоел наверно :) Но я почти дописал, совсем чуть-чуть осталось.

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение Viper » 21.01.2009 (Ср) 7:51

zusicks438 писал(а):Например, мне нужно закинуть в переменную txtStr строку под номером 12 от начальной строки файла. Что я должен сделать?
Значит ты должен считать 12 строк и поместить 12-ую в переменную txtStr.
zusicks438 писал(а):И как вообще определить сколько всего строк в файле?
Считать весь файл и подсчитать при этом количество строк. Все нужное тебе уже неоднократно показали.
Весь мир матрица, а мы в нем потоки байтов!

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 21.01.2009 (Ср) 19:41

А, дошло! Вот тормоз-то! Спасибо!

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 22.01.2009 (Чт) 20:11

Блин, при добавлении информации в конец файла частенько получается хрень:
Предположим, в файле есть строка: stroka
Я добавляю (Append) строку super в конец файла.
Вместо этого:

stroka
super

Получаю вот это:

strokasuper
Т.е. почему-то не обозначен новый абзац. Это редко, но происходит.
Можно ли как-то этого избежать?

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение Хакер » 22.01.2009 (Чт) 23:42

Потому что надо нет такого понятия, как абзац. Потому что файл, это поток байтов. Потому что байты со значениями 13 и 10 имеют особый смысл.


Читай об этом.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

Денис
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2734
Зарегистрирован: 07.11.2006 (Вт) 13:55
Откуда: Ейск, Краснодарский край

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение Денис » 23.01.2009 (Пт) 11:29

Перевожу на русский: Признаком конца абзаца и началом следующего в windows принято считать сочетание управляющих символов 10 и 13. В бейсике это значение присвоено константе vbCrLf, таким образом надо добавлять так:
Код: Выделить всё
vbCrLf & "super"
Программирование — богоизбранная дисциплина! Если бог и есть, то вселенную он скомпилировал, не иначе.

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 23.01.2009 (Пт) 19:20

А если новая строка уже началась? Ведь я писал, что такое происходит, но редко.

zusicks438
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 26.12.2008 (Пт) 20:16

Re: Подсчитать кол-во строк в файле и перескочить на др. label

Сообщение zusicks438 » 23.01.2009 (Пт) 19:40

Блин, а что нельзя вложить в цикл еще один цикл?

Do Until EOF(1)
Line Input #1, TxtStroka
If Car1 = TxtStroka Then
Call Pusto
Loop
Здесь идет продолжение цикла If

Пред.

Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot и гости: 84

    TopList