Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Visual Basic 6.0~01.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
21.23 Mб
Скачать

Властивість Width

Властивість визначає ширину форми в твипах. Воно аналогічно Height і зазвичай використовується у поєднанні з ним.

Властивість WindowState

Властивість WindowState визначає стан форми при запуску. Існує три допустимі значення, перерахованих в наступній таблиці.

Значення

Тип

Дія

0

Normal

Форма відкривається у нормальному стані

1

Minimized

Форма відкривається, але в згорнутому стані

2

Maximized

Форма розгортається на увесь екран

Налаштування властивостей форми

Значення багатьох властивостей можна задавати як в режимі виконання, так і в режимі конструювання. Деякі властивості встановлюються тільки в режимі конструювання (наприклад, BorderStyle), а деякі властивості можна задавати і читати тільки в режимі виконання. Властивості, доступні тільки в режимі виконання (наприклад, hWnd), не відображуються у вікні властивостей в режимі конструювання.

Властивість Caption - одна з тих властивостей, які легко змінити в режимі виконання. Наведу невеликий приклад: рядок «Привіт» в заголовку форми тут замінюється рядком «Доки». Згодом ми розширимо цю програму і навчимося задавати назви для окремих об'єктів на формі.

1. Створіть новий проект (File > New Project) і зміните значення Form1 властивості Name у вікні властивостей на frmForm1. Крім того, Встановіть значення властивості Caption в «Привіт».

2. Двічі клацніть на елементі-кнопці в панелі елементів, щоб розмістити на формі кнопку. Задайте для властивості Name значення cmdHello, а для властивості Caption - значення &Не11о.

3. Двічі клацніть на кнопці, щоб відкрити вікно програми з процедурою cmdHello_Click. Додайте в процедуру наступний фрагмент (також див. мал. 2.2):

If frmForm1.Caption = «Привіт» Then

frmForm1.Caption = «Доки»

Else

frmForm1.Caption = «Привіт»

End If

ПРИМІТКА. Оператори If - Then - Else дозволяють приймати рішення в програмах. Якщо умова If істинно, то виконується дія Then, інакше виконується Else. Логіка і послідовність виконання програми детально розглядається в уроці 6.

Мал. 2.2. Додавання нового фрагмента в процедуру.

4. Запустіть додаток (Run > Start) і натисніть кнопку.

Приведений вище фрагмент перевіряє поточне значення властивості Caption форми. Як видно з мал. 2.3, якщо на момент натиснення кнопки воно рівне «Привіт», то воно замінюється на «Доки». Інакше (тобто в умові Else) йому знову привласнюється рядок «Привіт».

Мал. 2.3. Зміна властивості Caption. Новий варіант програми

У наступному прикладі ми зробимо крок вперед. Подвійним клацанням на кнопці відкрийте вікно програми із процедурою Click. Відредагуйте процедуру так, щоб вона набрала наступного вигляду:

If frmForm1.Caption = «Привіт» Then

frmForm1.Caption = «Доки»

cmdHello.Caption = «&Привіт»

Else

frmForm1.Caption = «Привіт»

cmdHello.Caption = «&Доки»

End If

ПРИМІТКА. При завданні строкових властивостей в програмі не забувайте включити їх в лапки. Тим самим ви повідомляєте компілятор, що вказуєте фактичне значення, а не посилаєтеся на ім'я іншої змінної. Якщо значення строкової властивості задається у вікні властивостей, лапки не потрібні.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]