
- •Введение. Установка среды программирования
- •2. История языка Basic
- •3. Установка Visual Basic
- •Лабораторная работа №1. Интерфейс Visual Basic. Создание первого проекта
- •Теоретическая часть
- •1 . Первое знакомство
- •5. Стандартная панель инструментов
- •Практическая часть
- •Лабораторная работа №2. Изменение свойств компонентов. Метод Print
- •Теоретическая часть
- •1. Состав панели управления
- •2. Окно свойств и редактора кода
- •3. Свойства элементов управления
- •3.1 Свойства элемента Form
- •3.2 Свойства элемента TextBox
- •3.3. Свойства компонента CommandButton
- •Объект.Print [Список вывода]
- •Объект.Cls Практическая часть
- •Лабораторная работа №3. Работа с простейшим графическим объектом Visual Basic
- •Теоретическая часть
- •Практическая часть
- •Лабораторная работа №4. Работа с арифметическими выражениями и функциями
- •Теоретическая часть
- •1. Арифметические выражения Visual Basic.
- •2. Встроенные функции Visual Basic
- •3. Функции преобразования
- •Str (число)
- •Val (символьное выражение)
- •Практическая часть
- •Лабораторная работа №5. Решение простейших математических задач с использованием линейных алгоритмов
- •Теоретическая часть
- •1. Типы данных
- •2. Объявление переменных
- •Public / Private / Dim Имя_переменной [As Тип_переменной]
- •Оператор_объявления_типа Строка_интервалов_имен
- •3. Константы Visual Basic
- •4. Область видимости переменной
- •Public / Private / Dim Имя_переменной [As Тип_переменной]
- •Имя_формы.Имя_переменной
- •Практическая часть
- •Лабораторная работа №6. Программирование ветвлений с использованием оператора If
- •Теоретическая часть
- •1. Конструкция If … Then … End If
- •2. Конструкция If … Then … Else … End If
- •3. Конструкция If … Then … Else If… End If
- •Практическая часть
- •Лабораторная работа №7. Программирование ветвлений с использованием оператора Case
- •Теоретическая часть
- •Практическая часть
- •Лабораторная работа №8. Программирование циклов
- •Теоретическая часть
- •1. Цикл For…Next
- •2. Цикл For Each … Next
- •3. Цикл Do While … Loop
- •4. Цикл Do Until … Loop
- •5. Цикл Do … Loop While
- •6. Цикл Do … Loop Until
- •7. Цикл While … Wend
- •Практическая часть
- •Лабораторная работа №9. Разработка приложений для обработки массивов
- •Теоретическая часть
- •1. Объявление массивов
- •2. Массивы с фиксированной границей и динамические массивы.
- •UBound (имяМассива [, измерение]) Практическая часть
- •Лабораторная работа №10. Разработка приложений с использованием методов рисованИя графических примитивов
- •Теоретическая часть
- •1. Графическая поверхность
- •2. Графические примитивы
- •Практическая часть
- •Лабораторная работа №11. Построение графиков и диаграмм
- •Лабораторная работа №12. Применение пользовательских диалоговых окон
- •Теоретическая часть
- •1. Окно и функция InputBox
- •2. Окно MsgBox
- •MsgBox Текст сообщения [,Константа] [,Заголовок]
- •3. Функция MsgBox()
- •Практическая часть
- •Лабораторная работа №13. Разработка компьютерного теста с использованием Visual Basic
- •Теоретическая часть
- •Лабораторная работа №14. Создание пользовательского меню и панели инструментов
- •Теоретическая часть
- •Call Имя процедуры ([Список Параметров Вызова]),
- •Практическая часть
- •Лабораторная работа №15. Создание текстового редактора
- •Теоретическая часть
- •Практическая часть
- •Лабораторная работа №16. Разработка мультимедиа-приложений
- •Теоретическая часть
- •Практическая часть
- •Лабораторная работа №17. Макросы: запись, запуск, чтение
- •Теоретическая часть
- •Обычно макрос содержит следующие элементы.
- •Практическая часть
- •Лабораторная работа №18. Создание форм рабочего листа
- •Теоретическая часть
- •1. Когда необходимо использовать vba в Excel
- •2. Объект Application
- •3. Объект Workbook
- •4. Объект Worksheet
- •5. Объект Range
- •Инициализация и отображение диалогового окна
- •Практическая часть Создание пользовательской формы
- •Создание пользовательской формы
- •Практические задания по программированию на vba
- •Лабораторная работа №19. Создание книги лабораторных работ с автоматизированным выбором страниц книги
- •Практическая часть
- •Лабораторная работа №20. Моделирование процессов
- •Теоретическая часть
- •Лабораторная работа №21. Создание сводных таблиц в vba
- •Теоретическая часть Практическая часть
- •Лабораторная работа №22. Работа с компонентом Chart
- •Теоретическая часть Практическая часть
- •Лабораторная работа №23. Работа с базами данных в Visual Basic
- •Теоретическая часть Практическая часть
- •Лабораторная работа №24. Работа с базами данных в Excel с использованием Visual Basic
- •Теоретическая часть Практическая часть
- •Лабораторная работа №25. Обработка данных на рабочем листе Теоретическая часть Практическая часть
Лабораторная работа №3. Работа с простейшим графическим объектом Visual Basic
Цель работы: рассмотреть простейший графический объект Visual Basic – компонент Image; научиться составлять приложения с использованием компонента Image
Теоретическая часть
В Visual Basic для отображения в форме графики используются элемент управления Image (Изображение) и Picture (Графическое окно), создаваемые с помощью кнопок Image и PictureBox на панели элементов управления.
- компонент PictureBox (Графическое окно) – размещает в форме графическое окно, предназначенное для объединения элементов в группы, для вывода в него графических изображений, а также текста, графических элементов и анимации. Более подробно работа с этим компонентом рассмотрена в Лабораторной работе 10 и 11.
- компонент Image (Изображение) - размещает в форме поля, предназначенные для отображения графических изображений.
Свойства компонента Image
Picture – задает изображение в одном из графических форматов:
Bitmap – растровое изображение с расширением bmp или dib;
ICON – растровое изображение с расширением ico, имеющее размер 16*16 или 32*32 пикселов и называемое значком;
Cursor – растровое изображением с изображением курсора и расширением cur;
Metafile – метафайл, представляющий собой изображение в виде закодированных линий и образов с расширениями wmf и emf (расширенный метафайл);
Файлы в формате jpeg или gif.
Stretch – выравнивает размеры изображения по размерам компонента Image
BorderStyle – граница объекта; если значение равно 1 – Fixed Single, то компонент Image будет помещен в рамку
Appearance (Оформление) – свойство, придающее объекту объемность, если значение свойства равно 1-3D.
Способы загрузки изображения
Загружать графическое изображение в объект Image можно в процессе разработки приложения, а также программно при его выполнении.
Чтобы загрузить изображение при разработке, можно применить два способа.
После размещения в форме объекта Image выбрать его свойство Picture, а затем в открывшемся диалоговом окне Load Picture выбрать требуемый файл.
Использовать графическое изображение, подготовленное в другом приложении и перенесенное в форме с помощью буфера обмена Windows.
Рассмотрим более подробно второй способ. Для этого:
1. Подготовьте графическое изображение (в любом графическом редакторе или сфотографировав его с помощью клавиши на клавиатуре Print Screen).
2. Скопируйте его в буфер обмена Windows (не нужно при использовании клавиши Print Screen).
3. Перейдите в программу Visual Basic.
4. Разместите в форме объект Image.
5. Выберите элемент управления Image, чтобы он стал активным.
6. Вставьте в него изображение из буфера обмена, выбрав команду Paste из контекстного меню (правой клавишей мыши) или пункта меню Edit, или нажав комбинацию Ctrl+V.
Для загрузки изображения в объект Image во время выполнения приложения используется свойство Picture и функция LoadPicture следующего вида:
Image1.Picture = LoadPicture("имя_файла")
где имя_файла – это имя файла.
Рекомендуется записывать файлы с рисунками в ту папку, в которую записан проект. Если рисунков много, то внутри папки с проектом создавайте для них папку Pictures.
Рекомендуется использовать функцию LoadPicture в следующем виде:
Set Image1.Picture = LoadPicture (App.Path & ”\Pictures\” & Имя_файла)
Объект App в любой момент выполнения проекта хранит информацию о проекте. Свойство Path данного объекта имеет значение адреса выполняемого проекта. Если не использовать выражение App.Path или разместить рисунки не в папке проекта, файлы с рисунками могут быть не найдены.
Очистка элемента управления Image от размещенного в нем изображения:
Set Image1.Picture = LoadPicture()