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

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

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

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

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

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

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

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

Читаю учебники, пробую что-то сделать, но собрать всё во едино и чтобы работало не получается
...
Рейтинг: 0 / 0
05.12.2012, 00:26
    #38065356
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB6 Работа с файлом и занесение данных в таблицу
Дайте хотя бы образец исходных данных "расчетной программы"
...
Рейтинг: 0 / 0
05.12.2012, 16:12
    #38066502
Soundboykilla
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB6 Работа с файлом и занесение данных в таблицу
Мне важно понять схему составления цикла/программы, хорошо было бы на примере каком-либо
...
Рейтинг: 0 / 0
05.12.2012, 16:38
    #38066567
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB6 Работа с файлом и занесение данных в таблицу
Хм, в любом учебнике в разделе работы с файлами приводятся примеры таких циклов.
Может стоит начать с чего-то более простого тогда?
Ну вот вам например цикл, близкий к вашей задаче:
Код: 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
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB6 Работа с файлом и занесение данных в таблицу / 7 сообщений из 7, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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