Ход работы. 1. Создайте папку Лабораторная_работа_№15.

1. Создайте папку Лабораторная_работа_№15.

2. Запустите программу Microsoft Visual Basic 6.0.

3. В появившемся окне выберите тип приложения STANDARD.exe и нажмите кнопку «Открыть».

4. Свойству Nameоткрывшейся форме Form1присвойте значение frmБлокнот, а свойству Caption значение Блокнот. Остальные свойства для Формы установите по своему усмотрению (цвет, размеры и т.п.).

5. Разместите на форме компонент TextBox.

6. Удалите у компонента TextBoxсодержимое из свойства Text.

7. Выполните команду Tools → Menu Editor(Отладка → Редактор).

8. В окне редактора меню создайте меню, указав данные, приведенные в таблице 15.5. Для перехода к следующему пункту щелкайте по кнопке Next. Для создания подпункта пользуйтесь стрелками → и ←. В результате меню должно иметь вид, представленный на Рис.15.1 и 15.2.

Таблица 15.5

Название (Caption) Уровень (← →) Имя (Name)
Файл mnuProg
Создать itmСоздать
Открыть itmОткрыть
Закрыть itmЗакрыть
Сохранить itmСохранить
Сохранить как itmСохранить_как
Выход itmВыход
Правка mnuПравка
Копировать itmКопировать
Вырезать itmВырезать
Вставить itmВставить
Удалить itmУдалить

 

9. Щелкая по очереди левой клавишей мыши на пунктах меню «Правка» наберите нижеследующий программный код, соответствующий каждому пункту. Необходимые комментарии приведены в кавычках в коде программы.

Private Sub itmВставить_Click()

'вставим текст, находящийся в буфере обмена

frmБлокнот.Text1.SelText = Clipboard.GetText()








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


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

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

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

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