Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.77/26: Рейтинг темы: голосов - 26, средняя оценка - 4.77
9 / 9 / 7
Регистрация: 22.05.2009
Сообщений: 54

Работа с файлами

30.05.2009, 00:14. Показов 4978. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Недавно пришлось написать програмку на Visual Basic. И тут сталкнулся с одной нелепой проблемой. Программа создает текстовый файл и сохраняет туда столбик числовых значений (типа double). После некоторых расчетов она должна снова открыть этот файл и считать эти данные.

Проблема в том, что он сохраняет в файле дробные числа так, что целую часть от дробной разделяет не точка, а запятая. (пример: не 12.345, а 12,345). Само собой прочесть он уже эти числа не может. Подскажите, как быть? Может быть что-то не так в настройках среды (Visual Studio 2005)?

Пытался написать програмку, которая заменяет в файле все "," на ".", но и тут косяк. Он воспринимает запятую, как невидимый разделитель строк (как Энтер). Я в замешательстве! Все-таки нашел выход из ситуации, но он очень громоздкий и не универсальный.

Буду рад вашим советам!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.05.2009, 00:14
Ответы с готовыми решениями:

Работа с файлами , хотелось бы с windows system файлами
всем привет, нужна интересная идея по программированию, работа с файлами , хотелось бы с windows system файлами, у вас есть какая-то идея?...

Лабораторная работа №5. Работа с файлами и алгоритмы сортировки
1. Написать функцию Load для считывания из текстового файла (например, Workers.txt) информации о работниках и заработной плате. В первой...

Работа с файлами(Запись,чтение,работа с данными)
Здравствуйте, никак не могу осилить файлы... Для начала вот само задание: В справочной автовокзала хранится расписание движения автобусов....

6
 Аватар для Toxa33rus
3917 / 918 / 125
Регистрация: 16.04.2009
Сообщений: 1,944
30.05.2009, 10:42
Цитата Сообщение от Marinich Посмотреть сообщение
Пытался написать програмку, которая заменяет в файле все "," на ".", но и тут косяк. Он воспринимает запятую, как невидимый разделитель строк (как Энтер).
Да ну, бростье. Я только так и делаю всегда.
Visual Basic
1
a = Val(Trim$(Replace(a, ",", ".")))
1
9 / 9 / 7
Регистрация: 22.05.2009
Сообщений: 54
31.05.2009, 20:27  [ТС]
Спасибо. А можно прокомментировать эту строчку?
0
 Аватар для Abu
1161 / 288 / 23
Регистрация: 28.09.2008
Сообщений: 553
01.06.2009, 00:45
Цитата Сообщение от справочник по VB.NET
Val - функция, которая возвращает чило, содержащееся в строке.
Trim - удаляет начальные и конечные пробелы в строке.
Replace - возвращает строку, в которой одна подстрока заменена другой указанное количество раз.
т.е. в примере Toxa33rus все символы "," заменяются на "." в строковой переменной а.

А вообще я не совсем понимаю почему
Цитата Сообщение от Marinich Посмотреть сообщение
Само собой прочесть он уже эти числа не может.
Как читаете? В строку? Или сразу в переменную типа Double? И в том и в другом случае можно обойтись функцией CDbl, которая преобразует число в тип Double (даже если число представлено строкой).
0
9 / 9 / 7
Регистрация: 22.05.2009
Сообщений: 54
01.06.2009, 11:46  [ТС]
Пытался и в double и в String. Приведу пример кода:
Visual Basic
1
2
3
Dim Doub As Double
FileOpen(1, "test.txt", OpenMode.Input)
Input (1, Doub)
Допустим, что в файле test.txt записано 12,345;
Тогда в переменной Doub будет 12.0;

Другой код:
Visual Basic
1
2
3
Dim Str As String
FileOpen(1, "test.txt", OpenMode.Input)
Input (1, Str)
В переменной Str будет "12";

Если сделать:
Visual Basic
1
2
3
4
Dim Str1, Str2 As String
FileOpen(1, "test.txt", OpenMode.Input)
Input (1, Str1)
Input (1, Str2)
Str1 = "12" , а Str2 = "345".
0
 Аватар для Abu
1161 / 288 / 23
Регистрация: 28.09.2008
Сообщений: 553
01.06.2009, 21:18
А это принципиально читать с помощью Input?
1)
Visual Basic
1
2
3
4
5
6
Dim dbl As Double
Dim fs As New IO.FileStream("c:\test.txt", IO.FileMode.Open, IO.FileAccess.Read)
Dim w As New IO.StreamReader(fs)
dbl = w.ReadLine()
w.Close()
fs.Close()
2)
И как вы записываете в файл? Print?
Используйте WriteLine(numFile, Doub) или Write(numFile, Doub), а при чтении Input(1, myStr): Doub = Val(myStr), и всё тоже будет работать, как и в первом случае.

P.S. По крайней мере у меня оба варианта работают.
2
9 / 9 / 7
Регистрация: 22.05.2009
Сообщений: 54
02.06.2009, 09:54  [ТС]
Спасибо большое
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
02.06.2009, 09:54
Помогаю со студенческими работами здесь

Работа с файлами, чтение/работа со строкой
Доброго времени суток. Начал работать с C++ Builder 6. Есть текстовый файл .txt с различными строками, как можно производить...

Работа с файлами
Помогите пожалуйста довести до ума задачу: type fs = file of string; процедура Copir1(var f1,f2:fs) программы должна дополнять строки...

Работа с файлами на JS
Можно ли на JS проверить, существует ли файл с уже известным именем? Желательно пример кода.

Работа с файлами
Добрый вечер. Надо написать программу, которая в файле находит минимальный и максимальный элемент, а потом меняет местами первый и...

Работа с файлами
Задача программы такова - пользователь вводит строку адреса , например C:\blablabla и программа считывает все размеры файлов хранящихся в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Рецензия / Мнение Это мой обзор планшета X220 с точки зрения школьника. Недавно я решила попытаться уменьшить свой. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru