Конференция VBStreets

**Shild** » 02.05.2003 (Пт) 21:53

Помогите плиз с проблемкой. Моя програмка состоит из нескольких форм и в процессе работы приходится между ними постоянно переключаться. Так вот если закрывать форму командой Unload Me, то по возврашении к ней все данные введеные в текстбоксах на этой форме не сохраняются, что очень неудобно. Если закрывать командой Hide, то все прекрасно сохраняется, но при вводе других значений в текстбоксы, переменные (которым присваиваются значения из этих textbox'ов) не обновляются и остаются старыми. Может кто подскажет?

**goro** » 02.05.2003 (Пт) 22:07

Записывай переменные в файл а потом оттуда считывай и пиши в текстбоксы

**Shild** » 03.05.2003 (Сб) 13:01

Спасибо за совет. Но, блин не может же быть все хорошо. Теперь другая проблема. Я использую для записи в файл произвольный доступ и все прекрасно работает, пока дело не доходит до дробных чисел. При считывании их из файла они возвращаются с запятыми вместо точек, что не годится для расчетов. Что делать?

**alibek** » 03.05.2003 (Сб) 15:22

При сохранении преобразуй их в String функцией Str$(Value), а при чтении считывай через Val(Value) и все будет хорошо.

**Shild** » 03.05.2003 (Сб) 16:25

Спасибо за совет, но что-то не работает...
Использую примерно так:

Код: Выделить всё: X=Val(Text1.Text) Open "c:\temp.txt" For Random Access Write As #1 Put #1, 1, Str$(X) Close #1 'далее уходим на другую форму, а когда возвращаемся: Open "c:\temp.txt" For Random Access Read As #1 Get #1, 1, X Close #1 Text1.Text = Val(X)

в результате в текстбоксах какие-то совершенно абстрактные числа. Что здесь не так?

**RayShade** » 03.05.2003 (Сб) 16:35

А что, Line Input и Print уже никого не устраивают что ли? Зачем текстовик писать как бинарник?

**Shild** » 03.05.2003 (Сб) 17:17

Line Input и Print, насколько я знаю, только для последовательного доступа. Объясните тогда, как при последовательном доступе можно выдергивать значения переменных из текстового файла в произвольном порядке. В той литературе, что есть у меня под рукой, для последовательного доступа описывается возможность скачивать данные только целиком.

**RayShade** » 03.05.2003 (Сб) 17:24

Ну если произвольный доступ то да, line input не пойдет.

**Shild** » 05.05.2003 (Пн) 7:11

alibek писал(а):При сохранении преобразуй их в String функцией Str$(Value), а при чтении считывай через Val(Value) и все будет хорошо.

Ну подскажите как этим пользоваться :?:

!!

**Shild** » 05.05.2003 (Пн) 17:25

Help!!!!!!!!!!!!

**Firestorm** » 05.05.2003 (Пн) 17:52

ну почему бы не использовать глобальные переменные? перезаписывать их при выгрузке формы или change'е в текстбоксе... :lol:

**Shild** » 05.05.2003 (Пн) 18:24

Что-то я совсем зашпарился. В файлы писать начал... Естественно легче при загрузке формы вставлять в соответствующие textbox'ы соответствующие значения. Но проблема то остаётся - при считывании дробных значений из текстбоксов, точки меняются на запятые. И соответсвенно с ними же и вставляются при возвращении. Что делать-то????

**Info_m.be_free** » 05.05.2003 (Пн) 19:55

Работай с текстовыми значениями и не используй Get and Put а чтоб запятых небыло просто "кавычки" поставь вот он и не будет преобразовывать.

**ASD** » 06.05.2003 (Вт) 11:14

Сделай модуль и создай в нем Public переменные и юзай на здоровье

Public strText1 as string

И т.д.

А можешь обьявить его и как массив с нужным размером (чтоб неплодить кучу переменных.)

**Shild** » 06.05.2003 (Вт) 15:30

Thanks. Разобрался

.

Конференция VBStreets

Как правильно закрыть форму?

Как правильно закрыть форму?

Кто сейчас на конференции