| Вопрос: HELP !!! ( 4itanije informaciji s faila ) | Добавлено: 22.06.04 16:07 |
Автор вопроса:  rx | Web-сайт: erix.times.lv | ICQ: 310731115 |
|
Привет всем, Я - новичок в vbnet.ru Я нуждаюсь в ответе на мой вопрос.... Как загружать информацию от файла текста рядами... Например - этот пример читает весь файл текста в textbox... Open "c:\1.txt" for input as #1 text1.text = input (LOF (1),1) close #1 Но я должен читать это рядами... (каждый ряд (например) должен быть написан в другом textbox) |
, но не в VB
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302 |
Профиль | | #1 | Добавлено: 22.06.04 16:09 |
LineInput как-то так... и потом пройдись по всем текстбоксам циклом и каждому дай своё... А можно сперва весь файл считать в переменную, а потом уже циклом пройтись по боксам... Что быстрее - не знаю, не проверял
|
||
|
Номер ответа: 2 Автор ответа:  dNW Вопросов: 30 Ответов: 683 |
Профиль | | #2 | Добавлено: 22.06.04 17:49 |
|
Dim bffr as String
Open "C:\1.txt" For Binary Access Read Lock Write As #1 bffr=String(LOF(1),0) Get #1, 1, bffr Text1.Text=bffr Close #1 |
||
|
Номер ответа: 3 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #3 | Добавлено: 22.06.04 19:42 |
|
и ещё один пример
f = FreeFile Open "C:\1.txt" For Input as #f Do While Not EOF (f) Line input #f, stroka$ Loop Close #f |
||
|
Номер ответа: 4 Автор ответа: ViktorZICQ: 271202919 Вопросов: 56 Ответов: 837 |
Профиль | | #4 | Добавлено: 25.06.04 19:09 |
| 2Hacker xt то мне напоминает 1 учебник и переменные теже и бабки сыты. Просто хороший учебник по Vb. | ||
|
Номер ответа: 5 Автор ответа: @CyRax PTRICQ: 204447456 Вопросов: 28 Ответов: 664 |
Web-сайт: Профиль | | #5 | Добавлено: 25.06.04 21:14 |
Можешь даже показать себя знающим програмером и заменить тупо копируемое
 o While Not EOF (f)
на o Until EOF (f)
|
||
Страница: 1 |