Об'єкт.Circle Step(x,y),r, Color, start, fin

За допомогою параметрів x, у, r і Color визначають відповідно координату центра кола, з якого вирізана дуга (сектор), радіус кола і колір лінії дуги (межі сектора). Товщину і стиль лінії дуги або межі сектора, а також колір і стиль тонування внутрішнього поля сектора визначають відповідно, використовуючи параметри DrawWidth, DrawStyle, FillColor і FillStyle графічної поверхні, на якій застосовується метод Circle.

Параметр Start задає початкову точку дуги, яка лежить на перетині лінії кола і прямої, проведеної з центра кола під кутом Start до осі X.

Параметр fin задає кінцеву точку дуги (див. рис. 8.4). Кутові координати вимірюються в радіанах і зростають у напрямку проти годинникової стрілки. Дуга викреслюється від початкової точки до кінцевої також проти годинникової стрілки. Слід звернути увагу на те, що метод Сircle застосовується для викреслювання дуг, коли значення параметрів start і fin додатні, а якщо перед параметрами поставлено знак мінус, то викреслюється зображення сектора (рис. 8.5). Щоб зобразити сектор з точки, яка відповідає куту 0 градусів, замість нуля, треба записати: 2*3.14.

Рис. 8.4. Використання параметрів start і fin для креслення дуги

 

Рис. 8.5. Зображення сектора за допомогою методу Circle

 

8.4.6. Зображення еліпса

 

Метод Сircle дозволяє також зображувати також еліпс, еліптичну дугу або еліптичний сектор. Інструкцію виклику методу Сircle, який забезпечує викреслювання еліпса, в загальному вигляді можна записати таким чином:

Об'єкт.Circle Step(х,у), r, Color, start, fin, aspect

Уводячи параметри x і у визначають координату центра еліпса, параметр Сolor – встановлює колір межової лінії еліпса. Товщину і стиль лінії еліпса, дуги або сектора, а також колір і стиль тонування внутрішнього поля еліпса (сектора) визначають відповідно, користуючись параметрами DrawWidth, DrawStyle, FillColor і FillStyle графічної поверхні, на якій застосовано метод Сircle.

Користуючись параметрами start і fin, задають точки початку і кінця еліптичної дуги. При цьому параметр r відповідає більшому радіус еліпса, а параметр aspect – коефіцієнту стискування (трансформації) радіуса. Якщо значення параметра aspect менше від одиниці, то еліпс будується шляхом стискування кола по вертикалі, а якщо більше, то по горизонталі (рис. 8.6). У разі якщо значення параметра aspect дорівнює одиниці, то результатом побудови буде коло.

Рис. 8.6. Креслення еліпса за допомогою методу Circle

8.4.7. Відображення тексту

 

Виведення тексту на графічну поверхню відбувається методом Print. Інструкцію виклику методу в загальному вигляді можна записати таким чином:

Об'єкт.Print Рядок

Параметр Рядок задає розмір рядка, який треба вивести. Позиція, в якій з'явиться рядок, залежить від поточного положення покажчика графічного виведення.

Перш ніж викликати метод Print, треба встановити покажчик графічного виведення (присвоїти значення властивостям СurrentХ і СurrentY) в ту точку форми, де має бути лівий верхній кут текстового поля. Наприклад:

Private Sub Form_Click()

Scale (0, 0) – (100, 100) 'завдання розмірів графічного поля і напрямку координатних осей

' Координати початку тексту

CURRENTX = 10 ' координата

CURRENTY = 10

Print "Національний гірничий університет"

End Sub

Результат виконання цих інструкцій бачимо на рис. 8.7.

CurrentX

 

 

CurrentY

Положення покажчика поля виведення рядка

Рис. 8.7. Виведення тексту методом Print

 

 

Після виведення рядка покажчик автоматично переміщається в точку (0, у). При цьому значення координати у залежить від висоти текстового поля, яка, у свою чергу, залежить від характеристики (розміром) шрифту, що при цьому використовується для виведення тексту.

Характеристику шрифту, який застосовується в методі Print для відображення тексту, впливає на властивість Font графічної поверхні, колір символів, тобто ForeColor.

Якщо в ролі параметра методу Print увести змінну або вираз, тип якого відрізняється від параметра String, то відбудується автоматичне перетворення значення в рядок. Наприклад, у програмі оголошено змінну Today типу Date. Далі виконуємо такі інструкції:

Today = Now ' значення функції Now – поточна дата і час

Currentx =10

CURRENTY =10

Print Today

Це означає, що у форму буде введено поточну дату і час.

Найбільш часто використовувані формати рядків розглянуто в табл. 8.6

Таблиця 8.6

Формати відображення даних

Формат	Опис	Приклад використання
#.##	Дробове число з двома знаками після коми (десяткового роздільника). Якщо дробова частина числа дорівнює нулю, то її знаки не відображаються	Format(x, "#.##")
#0.00	Дробове число з двома знаками після коми (десяткового роздільника). Виконується округлення	Format(x, "#0.00")
### ### ##0.00	Дробове число з двома знаками після десяткового роздільника. Цифри цілої частини об'єднані в групи по три і розділені пропусками. Виконується округлення. Використовується для відображення грошових сум (у цьому випадку в кінці рядка зазвичай додають позначення грошової одиниці)	Format(summ "### ### ##0.00" грн.")
#0.00%	Відсоток. Значення автоматично множиться на 10 і в кінці рядка додається символ відсотка	Format(discount, "#0.00%")
dd/mm/yy	Дата у форматі день, місяць, рік. Символ-роздільник визначає операційна система	Format(Now, "Сьогодні dd/mm/yy")
ddd	День тижня	Format(Now, "Сьогодні dd/mm/dddd")
mmmm	Назва місяця в повному форматі	Format(Now, "Сьогодні dd mmmm, dddd")

Для перетворення значення виразу в рядок потрібного формату доцільно використати функцію Format. Вона має два параметри: вираз, значення якого треба перетворити в рядок, і рядок форматування. Наприклад, значення Format (С, "### ### ##0.00 грн.") являє собою подання змінної С, у вигляді рядка в якому цифри, об'єднано в групи по три, розділено пропусками, а після десяткового роздільника завжди відображаються дві цифри (навіть якщо дробова частина числа дорівнює нулю), при цьому в кінеці рядка додається позначення грошової одиниці.

Слід звернути увагу на те, що форматування наведеного рядка забезпечує автоматичне округлення числа за відомими правилами. Наприклад, якщо значення змінної С дорівнює 28580,446, то значенням функції Format буде такий рядок: 28580,45.

Для того, щоб повернутися до поточної дати і часу потрібно використати функцію now.

 

8.5. Виконання ілюстрацій

 

Компоненти РictureBox та Image забезпечують відображення ілюстрацій у таких форматах: BMP, GIF, JPG, JPEG, PNG, а також метафайлів (WMF, EMF) і значків (ICO). Компонент РictureBox має ширші, порівняно з компонентом Image, можливості (зокрема, на його поверхні можна створювати зображення). Разом з тим компонент РictureВox не дозволяє відображати ілюстрацію, розмір якої його перевищує (для виконання великих ілюстрацій слід використовувати компонент Image, який має здатність до масштабування). Основні властивості компонента PictureBox описано в табл. 8.7.

Таблиця 8.7

Властивості компонента PictureBox

Властивість	Опис
Picture	Ілюстрація, що відображається в полі компонента
AutoSize	Ознака автоматичної зміни розміру компонента відповідно до розміру ілюстрації. Якщо значення рівне True, то розмір компонента відповідає розміру ілюстрації
Visible	Ознака відображення компонента на поверхні форми. Дозволяє приховати компонент (False) або зробити його видимим (True)
Appearance	Стиль компонента. Поле компоненту може перебувати над поверхнею форми (у цьому випадку значення властивості дорівнює 3D), або розміщуватись на одному рівні з поверхнею форми (у цьому випадку властивість набуває значення Flat)
BorderStyle	Тип межі компонент. Межа може бути тонкою (FixedSingle) або повністю відсутньою (None)
ScaleMode	Одиниця вимірювання розмірів компонента і об'єктів на ньому
ScaleWidth	Ширина робочого поля компонента (без урахування ширини його лівої і правої меж)
ScaleHeight	Висота робочого поля компонента (без урахування ширини його нижньої і верхньої меж)
Left	Відстань від лівої межі компонента до лівої межі форми
Тор	Відстань від верхньої межі компонента до верхньої межі форми
Width	Ширина компонента з урахуванням ширини межі
Height	Висота компонента з урахуванням ширини межі

Ілюстрацію, яка відображається в полі компонента PictureBox, можна задати як під час розробки форми додатка, так і в поцесі роботи програми.

Щоб задати ілюстрацію під час розробки форми, треба в рядку властивості Picture клацнути на кнопці з трьома крапками і в діалоговому вікні Load Picture вибрати файл ілюстрації. Слід звернути увагу: файл, в якому зберігається ілюстрація, вибрано таким чином, що під час роботи програми він не потрібний (Visual Basic автоматично поміщає копію ілюстрації у виконуваний файл програми).

Якщо розмір ілюстрації більший від розміру компонента, але не перевищує розміру поля форми, яка може бути використана для відображення цієї ілюстрації, то властивості Autosize можна присвоїти значення True. Унаслідок цього результаті розмір компонента буде відповідати розміру вибраної ілюстрації. Якщо є обмеження на розмір поля, то замість компонента PictureBox доведеться використовувати компонент Image.

Основні властивості компонента Image перелічено в табл. 8.8.

Таблиця 8.8

Властивості компонента Image

Властивість	Опис
Picture	Ілюстрація, що відображається в полі компоненту
Stretch	Ознака необхідності масштабування ілюстрації так, щоб вона займала все поле відображення. Масштабування відбувається, якщо властивість набуває заначення True
Width	Ширина компонента (зона відображення ілюстрації) з урахуванням ширини лінії, яка обмежує ілюстрацію
Height	Висота компонента з урахуванням ширини лінії, яка обмежує ілюстрацію
Left	Відстань від лівої межі компонента до лівої межі форми
Тор	Відстань від верхньої межі компонента до верхньої межі форми
Visible	Ознака відображення компонента. Дозволяє приховати компонент (тоді вона набуває значення False) або зробити його видимим (тоді це значення True)
Appearance	Стиль компонента. Поле компонента перебуває над поверхнею форми (у цьому випадку властивість набуває значення 3D) або розміщується на одному рівні з поверхнею форми (у цьому випадку властивість набуває значення Flat)
BorderStyle	Тип межі компонента. Лінія, що обмежує ілюстрацію може бути тонкою (FixedSingle) або зовсім відсутньою (None)

Слід звернути увагу, що після завантаження в компонент Image ілюстрації якщо властивість Stretch відповідає значенню True, розмір компонента буде відповідати розміру ілюстрації. Якщо властивість Stretch набуває значення False, то зміна значення властивості Рicture не приведе до зміни значень властивостей Width і Height.

Завантаження ілюстрації в поле компонента PictureBox (Image) під час роботи програми забезпечує функція LoadPicture. У ролі параметра цієї функції треба назвати файл ілюстрації, а її значення присвоїти властивості Рicture. Наприклад, унаслідок виконання такої інструкції: Picture1.Picture = LoadPicture ("d:\images\ufo.bmp"), у полі компонента Рicture1 з'явиться ілюстрація, що зберігається в названому файлі.

Приклад 8.2