| Вопрос: Трабл | Добавлено: 28.05.05 02:04 |
Автор вопроса:  ArtBase | ICQ: 55593017 |
|
Тока не бейте по голове :) И так уже не соображаю.
Короче, есть txt файл в нем 50 строк с различными записями. Как каждой переменной присвоить свою строку, т.е. i1= 1строка, i2=2строка и т.д. ? Ясненько? |
| Ответы | Всего ответов: 11 |
|
Номер ответа: 1 Автор ответа:  radist ICQ: 317387137 Вопросов: 3 Ответов: 10 |
Профиль | | #1 | Добавлено: 28.05.05 02:39 |
|
'Вот, вроде то что надо, только здесь массив(в 'данном случае Text). Потом будешь обоащаться как 'Text(1), Text(2), Text(3) и тд.
Private Text() as string Dim i long Open "  :\win32api.txt" For Input As #1 Len = 1024
Do Until EOF(1) i = i + 1 ReDim Preserve Text(i + LineNum) Line Input #1, Text(i) Loop Close #1 'Вообще лучше использовать в таких случаях как у 'тебя массивы, память сохраняется-оптимизация. |
||
|
Номер ответа: 2 Автор ответа:  Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #2 | Добавлено: 28.05.05 11:04 |
|
Намного лучше (быстрее и надежнее) так:
Dim s As String Open "C:\file1.txt" For Binary As #1 s = Space$(LOF(1)) Get #1,,s Close #1 Dim strs() As String strs = Split(s, vbCrLf) Теперь доступ к строкам через элементы массива: strs(0), strs(1), strs(2) и т.д. |
||
|
Номер ответа: 3 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #3 | Добавлено: 28.05.05 14:43 |
|
чуть уточню, ты просил
т.е. i1= 1строка, i2=2строка и т.д. ?
но чисто в переменную не пойдёт, для этого нужен массив! i(0), i(1), i(2)... итд, см. пример Павла. Если уж всёравно в переменные нужно, то придётся самому... Open " :\win32api.txt" For Input As #1
Line input #1,i1 Line input #1,i2 Line input #1,i3 ... Но это не есть хорошо... |
||
|
Номер ответа: 4 Автор ответа: Barsik Разработчик Offline Client ICQ: 343368641 Вопросов: 17 Ответов: 686 |
Web-сайт: Профиль | | #4 | Добавлено: 28.05.05 16:46 |
|
Open "
:\win32api.txt" For Input As #1
Line input #1,i1 Line input #1,i2 Line input #1,i3 ... ??? пятьдесят раз предлагаешь считывать??? лучше каждую строку в ячейку масива 
|
||
|
Номер ответа: 5 Автор ответа: Black DragonICQ: 321186096 Вопросов: 30 Ответов: 347 |
Web-сайт: Профиль | | #5 | Добавлено: 28.05.05 20:41 |
|
2Barsik: HACKER имел в виду, что если нужно в каждую переменную строки писать, как товарищ ArtBase написал А так, естественно лучше использовать пример Павла.
|
||
|
Номер ответа: 6 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #6 | Добавлено: 29.05.05 01:48 |
| ну хоть кто-то понял, значит все старания не напрасно... | ||
|
Номер ответа: 7 Автор ответа: Black DragonICQ: 321186096 Вопросов: 30 Ответов: 347 |
Web-сайт: Профиль | | #7 | Добавлено: 29.05.05 21:35 |
|
HACKER писал же: Но это не есть хорошо...
|
||
|
Номер ответа: 8 Автор ответа: SharkICQ: 284036855 Вопросов: 35 Ответов: 155 |
Web-сайт: Профиль | | #8 | Добавлено: 30.05.05 22:44 |
|
Если с переменными моно указывать их так i+(g)=
в цикле где изменяется g |
||
|
Номер ответа: 9 Автор ответа: Black DragonICQ: 321186096 Вопросов: 30 Ответов: 347 |
Web-сайт: Профиль | | #9 | Добавлено: 31.05.05 20:15 |
| 2Shark: ну, согласись, ты ерунду сморозил | ||
|
Номер ответа: 10 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #10 | Добавлено: 01.06.05 22:29 |
|
2 Shark ))
А с другой стороны, было бы наверно круто если бы можно было так, просто шарик закрыл на минутку глаза и представил ВБ будущего )))))))))
|
||
|
Номер ответа: 11 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #11 | Добавлено: 01.06.05 22:31 |
|
ой сорри, не шарик а Шарк ! В глазах мутнеет просто ну сплю редко, сами понимайте, такие как я много не спят.
|
||
Страница: 1 |