Страница: 1 |
У меня такой вопрос. У меня допустим есть текстовый файл в котором 5 строк текста. Надо сделать так, чтобы при нажатии на Батон первая строка загружалась в текстовое поле с именем Text1 вторая строка в поле с именем Text2 ну и так далее. Заранее больное спасибо.
А ты дели ее Split'ом по vbCrLf в массив и вставляй эти элементы в поля. Если не понял - пиши. Другой вариант. По-моему я где-то недавно это уже писал... Создавай текстбоксы, как массив. Sub sbReadFile(strFile as String) 'получаем свободный дескриптор файла Dim hFile as Long hFile = FreeFile 'открываем файл для чтения Open strFile For Input As hFile Dim i as Integer i = 0 Do Until EOF(hFile)'чтение до конца файла i = i + 1 Line Input #hFile, strLine Text(i).Text = strLine 'вывод результата Loop Close hFile 'закрываем файл End Sub Страница: 1 |
Вопрос: Работа с тексом
Добавлено: 11.12.03 19:00
Автор вопроса: payalnik | Web-сайт:
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
Александр
Разработчик Offline Client
ICQ: 204034
Вопросов: 106
Ответов: 1919
Профиль | | #1
Добавлено: 11.12.03 19:14
Номер ответа: 2
Автор ответа:
Ворон
ICQ: 178095693
Вопросов: 6
Ответов: 24
Профиль | | #2
Добавлено: 11.12.03 20:39