Ход работы. 1. Создайте папку Лабораторная_работа_№3, а в ней папку 3.1.
1. Создайте папку Лабораторная_работа_№3, а в ней папку 3.1.
2. Запустите программу Microsoft Visual Basic 6.0.
3. В появившемся окне выберите тип приложения STANDARD.exe и нажмите кнопку «Открыть».
4. Расположите на форме три компонента OptionButton и 3 компонента Image, свойства которых установите согласно Таблице 3.1 или ориентируясь на внешний вид приложения (Рис.3.1).
Таблица 3.1 – Свойства компонентов приложения «Просмотр картинок»
Компонент | Свойство | Значение |
Form1 | Caption | Просмотр картинок |
Name | frmФото | |
MaxButton, MinButton | False | |
Icon | Загрузите любое графическое изображение формата *.ico | |
OptionButton1 | Caption | Картинка 1 |
Name | Opt1 | |
OptionButton2 | Caption | Картинка 2 |
Name | Opt2 | |
OptionButton3 | Caption | Картинка 3 |
Name | Opt3 | |
Image1 … Image3 | Picture | Загрузите любое графическое изображение формата *.jpeg с диска D:\Рабочая\Рисунки |
Stretch | True | |
Visible | False | |
Свойство Font, Width, Height и BackColor установите у компонентов Form и OptionButton по своему усмотрению |
5. Щелкните два раза по компоненту Option Button1 («Картинка 1») и напишите обработчик события Click для этой кнопки:
Private Sub Opt1_Click()
Image1.Visible = True 'видна первая картинка
Image2.Visible = False 'вторая картинка невидима
Image3.Visible = False 'третья картинка невидима
Дата добавления: 2015-06-12; просмотров: 564;