powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Работа с файлами.
6 сообщений из 6, страница 1 из 1
Работа с файлами.
    #39229992
Topolev2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день.Буду заранее благодарен за внимание и помощь.
Мне требуется написать на VB6 две программы,работая с текстовыми файлами.
1)В текстовом файле несколько строк, каждая из которых содержит дату вида
12 февраля 2016 г. Написать программу, которая считывает эти записи и сортирует их в порядке возрастания даты. Результат выводится на экран.
Я предполагал,что у меня получится справится с этой задачей своими силами..но все мои попытки вели к ошибке переполнение,или несоответствию данных,невозможности присвоению к массиву.Как соотнести строки,даты,массивы к работающему механизму я просто не понимаю.Я старался сделать так,чтобы оно просто выводило на экран то,что есть в файле,но и тут меня ждал провал.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Private Sub Command1_Click()
Dim MyFile
Dim S(1, 5) As Date
MyFile = FreeFile

Open C / Test / Test.txt For Input As #MyFile

 For i = 1 To 5

Line Input #MyFile, tS
 S = tS
 Print S
Next i

Close #MyFile

End Sub


Модератор: Учимся использовать тэги оформления кода - FAQ
2)Текстовый файл А содержит текст с русскими и латинскими буквами. Создать новый файл В, котором из этого текста будут удалены русские буквы.
Тут я не смог уйти дальше назначения пути к файлу,он выдает переполнение.
...
Рейтинг: 0 / 0
Работа с файлами.
    #39230014
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1) Текстовые литералы (в данном случае путь к файлу) нужно брать в кавычки

2) Усилием мысли не удалось увидеть строку, на которой у вас происходит ошибка.
...
Рейтинг: 0 / 0
Работа с файлами.
    #39230021
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tS - не объявлен
Код: vbnet
1.
Open "C:\Test\Test.txt" ...


Код: vbnet
1.
S = tS

- нельзя так массив присваивать
Код: vbnet
1.
S(1) = tS

можно так, например
...
Рейтинг: 0 / 0
Работа с файлами.
    #39230024
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Topolev2Как соотнести строки,даты,массивы к работающему механизму я просто не понимаюна виндах с установленными русскими региональными настройками функция CDate вполне справится с датой в формате "12 февраля 2016". Год ("г.") в конце строки придется отбрасывать вручную. Если же требования более строгие, придется создавать словарь русскоязычных названий месяцев и разбирать дату вручную. Дальше сортировка массива любым доступным способом и вывод.
...
Рейтинг: 0 / 0
Работа с файлами.
    #39230050
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Konst_One
Код: vbnet
1.
S(1) = tS


можно так, напримеручитывая, что массив объявлен двумерным, так тоже нельзя ))
...
Рейтинг: 0 / 0
Работа с файлами.
    #39230057
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.ProKonst_One
Код: vbnet
1.
S(1) = tS



можно так, напримеручитывая, что массив объявлен двумерным, так тоже нельзя ))

тем более. проще привести пример вашего файла, достаточно одной строки
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Работа с файлами.
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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