Page 75 - 4788

Потім значення змінної DlgDef використовується при
виклику MsgBox.
Синтаксис функції MsgBox практично співпадає з
синтаксисом однойменного оператора:
Dim rс As Integer
rc= MsgВох(повідомлення, атрибути, заголовок)
Вікно введення, як і вікно повідомлення, може
викликатися оператором або функцією. Скорочений
синтаксис функції виглядає так:
Dim rс As String
rc = InputВох(повідомлення, заголовок, за
замовчуванням)
Цього разу параметр атрибути відсутній, проте
з’являється додатковий параметр за замовчуванням. В ньому
можна задати рядок, який за замовчуванням знаходитиметься
в текстовому полі. Коли користувач натискає кнопку ОК,
вміст цього поля привласнюється змінній (у нашому випадку
rс). Якщо користувач натиснув кнопку Cancel, повертається
рядок нульової довжини. Зверніть увагу — функція InputBox
повертає рядок, а функція MsgBox — значення цілого типу.
Наступний приклад показує, як користуватися функцією
InputBox:

Private Sub Command1_Click()
Dim rс As String
rс = InputBox("Введіть ім’я:")
MsgBox "Привіт, " & rс & "!"
End Sub
Запустити програму командою Run - Start. Натиснути
кнопку, щоб викликати діалогове вікно InputBox. Ввести в
текстовому полі своє ім’я і натиснути кнопку ОК. Цей
маленький приклад у загальних рисах показує, як працюють
діалогові вікна MsgBox і InputBox. Якщо все зроблено
правильно, у вікні введення вам буде запропоновано ввести
ім’я, після чого Visual Basic видає вікно повідомлення з
рядком типа «Привіт, Стів!» (зрозуміло, у вашому випадку
буде виведене ім’я, задане у вікно введення).

73