Функція InputBox призначена для виводу на екран вікна діалогу, в якому міститься:
· текст (пояснення, які дані потрібно ввести)– задається аргументом prompt ;
· поле, в яке вводиться необхідна інформація, її можна задати по замовчанню аргументом default
· дві кнопки OK та Cancel –при натисканні на кнопкуOK функція повертає значення, яке було введено в поле вводу, а при виборіCancel–пустий рядок;
Пояснимо призначення аргументів.
Prompt – задає текст (запрошення до вводу). Цей аргумент є обов’язковим, а всі інші можна не задавати. Може складатися з декількох рядків. Для перенесення на новий рядок можна використовувати функцію CHR(13)
Title – задає заголовок вікна, якщо опущений, то в заголовок виводиться ім’я додатку (Microsoft Excel)
Default – задає рядок у полі вводу, якщо опущений, то поле вводу пусте
xpos, ypos – координати на екрані лівої верхньої границі вікна
Для того, щоб вивести на екран вікно діалогу, мал.15
мал.15
треба написати таку програму:
Public Sub Перша_програма()
dat = InputBox("Введіть дату","Моя програма","1 вересня")