Завдання кольору в Visual Basic 6.0

End Sub

Circle (4000, 2000), 700, , -4, -5.5

Circle (4000, 2000), 700, , 0.8, 2.4

Circle (2500, 2500), 550, , , , 3

Circle (2500, 1000), 300, , , , 0.3

Circle Step(0, 1500), 550

Circle (1000, 1000), 300

Show

Приклад 2. Метод Circle

Private SubForm_Load()

DrawWidth = 2

CurrentX = 440: CurrentY = 700: Print 1

CurrentX = 400: CurrentY = 2000: Print 2

CurrentX = 2000: CurrentY = 1000: Print 3

CurrentX = 2100: CurrentY = 2700: Print 4

CurrentX = 4000: CurrentY = 1000: Print 5

CurrentX = 4000: CurrentY = 1800: Print 6

Приведена програма малює у формі показані на мал. 2 шість фігур

Мал. 2. Малюнки, отримані з допомогою графічного методу Circle

Значення кольору мальованої фігури при записі коду програми можна задавати різними способами.

· Простий спосіб завдання — це використання констант. Відповідність констант восьми основним кольорам дана в таблиці. 1. Червону крапку на формі поставить такий запис:

Pset(100, 100), vbRed.

· Більше шістнадцяти мільйонів кольорів і відтінків можна отримати, використовуючи функцію RGB.

Її синтаксис:

RGB(Red, Green, Blue)

де кожен аргумент функції визначає інтенсивність основного цвета і може набувати значень від 0 до 255. Для здобуття восьми основних кольорів аргументи функції RGB повинні набувати значень, вказаних в таблиці 1.

· Використання функції color що знайомо працював з графікою мов QBasic і Quick Basic. Синтаксис цієї функції:

QBColor(color)

де color— ціле число з діапазону від 0 до 15. Назви і значення кольорів приведені в таблиці 2.

2. Квадрат світло-червоного кольору створить на формі такий запис:

Line (100,100) - (500,500), QBColor (12).

· Можна використовувати шістнадцяткове представлення коду кольору. Такий запис можна спостерігати у вікні Властивості в правій колонці рядка властивостей, що визначають колір. Запис обрамовують лідируючим і замикаючим символом амперсенда (&) і починається з букви H. Значення основних кольорів приведені в таблиці 1. Значення кольорів палітри можна виписати з вікна Властивості.

Читайте також:

<== попередня сторінка	\|	наступна сторінка ==>
Лекція 9. Україна в період нової економічної політики	\|	End Sub

Не знайшли потрібну інформацію? Скористайтесь пошуком google:

Генерація сторінки за: 0.004 сек.