 |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
Ход работы. 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 'третья картинка невидима
Дата публикования: 2014-12-28; Прочитано: 188 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!
