Сохранение и загрузка данных

@BlackJack113 · Регистрация: 10.04.2017

Студворк — интернет-сервис помощи студентам

Только недавно начал работать в VB и создавать программу. Мне нужно что бы по нажатию кнопки, программа сохраняла данные которые находятся в TextBox и PictureBox в файл, а потом по нажатие другой кнопки, загружала их. Пытался разобраться, но ничего не понял. Помогите пожалуйста.

@Pro_grammer · 11.04.2017, 06:45

Visual Basic
1
2
3
4
Private Sub Command1_Click() 'При нажатии на кнопку:
Picture1.Picture = LoadPicture("c:\1.bmp") 'Картинка загружается в объект PictureBox(Вместо c:\1.bmp - напиши путь к картинке)
Image1.Picture = LoadPicture("c:\1.bmp") 'Картинка загружается в объект Image
End Sub

Visual Basic
1
2
3
4
Private Sub Command2_Click()
SavePicture Picture1.Picture, "c:\1.bmp" 'Картинка сохраняется в файл Picture.BMP, из объекта Picture 
SavePicture Image1.Picture, "c:\1.bmp" 'Картинка сохраняется в файл Image.BMP, из объекта Image
End Sub

Visual Basic
1
2
3
4
5
Open "c:\1.txt" For Output As #1
 
    Print #1, Text1.Text
 
Close #1

Visual Basic
1
2
3
4
5
6
7
8
Open "c:\1.txt" For Input As #1
    Dim S As String
    While Not EOF(1)
        n = n + 1
        Input #1, S
       Text1.Text =Text1.Text &  S & VbCrLf
    Wend
Close #1

@BlackJack113 · 11.04.2017, 16:41 **[ТС]**

Извините за мою тупость, с текстом все работает, спасибо большое, а вот с PictureBox не сохраняет. Пытался менять, по разному, но все также ошибку выдает (Run-time '380'. Invalid property value)

@paau · 11.04.2017, 17:17

BlackJack113, а в PictureBox какая то картинка есть?
Я что то не могу понять предназначение этого элемента, если там печатается текст.

@BlackJack113 · 11.04.2017, 17:47 **[ТС]**

paau, дело в том, что в pictureBox выводятся значения, которые были ранее записаны и подсчитаны. Сделал я это для того, что смотрится более приятным для глаз. Написанный выше код для сохранение значений в TextBox, я не много изменил и смог сохранить то что в picture box(я не уверен что это правильно), но теперь мне надо это как-то загрузить. А ещё лучше(да, я знаю что это наглость), было бы, что бы при сахронение, тот кто это сохраняет, файл, мог сам называть, а при загрузки - выбирать, то что загружает. Если это возможно конечно

@Sur_L · 11.04.2017, 23:36

Сообщение от BlackJack113

а вот с PictureBox не сохраняет.

Visual Basic
1
2
3
4
Picture1.AutoRedraw = True
Picture1.Print 3.14159265358979
Picture1.Picture = Picture1.Image
SavePicture Picture1.Picture, "c:\1.bmp"

Новые блоги и статьи Все статьи Все блоги /
Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .

@BlackJack113 0 / 0 / 0 Регистрация: 10.04.2017 Сообщений: 12

	Сохранение и загрузка данных 10.04.2017, 20:41. Показов 1440. Ответов 5 Метки нет (Все метки) Только недавно начал работать в VB и создавать программу. Мне нужно что бы по нажатию кнопки, программа сохраняла данные которые находятся в TextBox и PictureBox в файл, а потом по нажатие другой кнопки, загружала их. Пытался разобраться, но ничего не понял. Помогите пожалуйста. 0

@BlackJack113 0 / 0 / 0 Регистрация: 10.04.2017 Сообщений: 12
	11.04.2017, 16:41 [ТС]
	Извините за мою тупость, с текстом все работает, спасибо большое, а вот с PictureBox не сохраняет. Пытался менять, по разному, но все также ошибку выдает (Run-time '380'. Invalid property value) Миниатюры 0

@paau 42 / 20 / 9 Регистрация: 15.01.2015 Сообщений: 95
	11.04.2017, 17:17
	BlackJack113, а в PictureBox какая то картинка есть? Я что то не могу понять предназначение этого элемента, если там печатается текст. 0

@BlackJack113 0 / 0 / 0 Регистрация: 10.04.2017 Сообщений: 12
	11.04.2017, 17:47 [ТС]
	paau, дело в том, что в pictureBox выводятся значения, которые были ранее записаны и подсчитаны. Сделал я это для того, что смотрится более приятным для глаз. Написанный выше код для сохранение значений в TextBox, я не много изменил и смог сохранить то что в picture box(я не уверен что это правильно), но теперь мне надо это как-то загрузить. А ещё лучше(да, я знаю что это наглость), было бы, что бы при сахронение, тот кто это сохраняет, файл, мог сам называть, а при загрузки - выбирать, то что загружает. Если это возможно конечно 0

Сохранение и загрузка данных

Решение