Задание 4. Создание и обработка команд меню Файл. Работа с файлами

В меню «Файл» обычно располагаются команды, отвечающие за загрузку ранее сохраненного текстового или какого-либо другого документа (Открыть), сохранение изменений, внесенных в открытый текстовый документ (новый или ранее созданный), создание нового документа (Создать/Новый).

Постановка задачи.

Запрограммировать работу команд пункта меню «Файл», позволяющих:

· создать новый файл;

· открыть существующий файл;

· сохранить существующий файл;

· выйти из программы.

Ход работы.

1. Структура меню «Файл» была приведена на Рисунке 15.1. Для работы пунктов меню «Файл» необходимо сначала описать переменные. Наберите в начале кода программы (в разделе глобальных объявлений) нижеследующие строки (в кавычках приведены соответствующие комментарии):

Dim txtChange As Boolean 'Переменная txtChange принимает значение True,

'если в текстовом поле были какие-то изменения

Dim textString As String 'Переменная содержит строку текста, прочитанную

'из текстового файла оператором Input#

 

2. Затем наберите две событийные процедуры:

Private Sub Form_Load()

Text1.Text = ""

End Sub

Private SubText1_Change()

txtChange =True 'Переменная txtChange принимает значение True, если

'в текстовом поле были изменения








Дата добавления: 2015-06-12; просмотров: 460;


Поиск по сайту:

При помощи поиска вы сможете найти нужную вам информацию.

Поделитесь с друзьями:

Если вам перенёс пользу информационный материал, или помог в учебе – поделитесь этим сайтом с друзьями и знакомыми.
helpiks.org - Хелпикс.Орг - 2014-2024 год. Материал сайта представляется для ознакомительного и учебного использования. | Поддержка
Генерация страницы за: 0.003 сек.