powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB6 Работа с файлом и занесение данных в таблицу
7 сообщений из 7, страница 1 из 1
VB6 Работа с файлом и занесение данных в таблицу
    #38064761
Soundboykilla
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго времени суток.
Проблема такова, что имеется выходной файл расчётной программы и с него надо считать лишь определённые данные, занеся их при этом в таблицу.

Собственно вопросы:
файл считываем через команду Open или ReadFile(путь к файлу);
считывание строк и поиск нужных значений через цикл:

If mid(string, n, k)=str(i) then
i=instr(U235) , где U235 как одна из искомых величин в файле

т.е. как правильно построить цикл, чтобы прочитать весь файл и забрать необходимые данные?

И в дальнейшем, как занести эти данные в таблицу(удобней, скорей всего, привязать Exсel) ?

Прошу подтолкнуть на правильный ход мысли.
...
Рейтинг: 0 / 0
VB6 Работа с файлом и занесение данных в таблицу
    #38064792
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что именно вызывает проблемы?
EOF потребуется, чтобы определить конец файла
синтаксис InStr предусматривает больше параметров
Обратите внимание на функцию Split - она может оказаться намного удобнее для разбора.

Если не знаете, как работать с экселем, поищите здесь примеры по CreateObject Excel Application
А можно просто создать на выходе текстовый файл в формате CSV, который потом откроется в экселе.
...
Рейтинг: 0 / 0
VB6 Работа с файлом и занесение данных в таблицу
    #38064939
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Возможно, если "выходной файл расчетной программы" уже как-то стандартно отформатирован - его можно прямо в Экзель импортировать...
...
Рейтинг: 0 / 0
VB6 Работа с файлом и занесение данных в таблицу
    #38065227
Soundboykilla
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Проблема в том, что я никак не могу понять как целостно написать программу: от открытия/прочтения файла, до выбора необходимого из него и записи этого.

Буду благодарен за набросок такого малейшего примера (при ваших условиях)

Читаю учебники, пробую что-то сделать, но собрать всё во едино и чтобы работало не получается
...
Рейтинг: 0 / 0
VB6 Работа с файлом и занесение данных в таблицу
    #38065356
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дайте хотя бы образец исходных данных "расчетной программы"
...
Рейтинг: 0 / 0
VB6 Работа с файлом и занесение данных в таблицу
    #38066502
Soundboykilla
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Мне важно понять схему составления цикла/программы, хорошо было бы на примере каком-либо
...
Рейтинг: 0 / 0
VB6 Работа с файлом и занесение данных в таблицу
    #38066567
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Хм, в любом учебнике в разделе работы с файлами приводятся примеры таких циклов.
Может стоит начать с чего-то более простого тогда?
Ну вот вам например цикл, близкий к вашей задаче:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Dim A As Integer, B As Integer, t As String
A = FreeFile
Open "v:\1.txt" For Input Access Read Shared As #A
B = FreeFile
Open "v:\2.txt" For Output Access Write As #B
Do While Not EOF(A)
  Line Input #A, t
  Print #B, t + "bebebe"
Loop
Close #B
Close #A
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB6 Работа с файлом и занесение данных в таблицу
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]