Существует
2 типа встроенных диалоговых окон (ДО): окно сообщений и окно ввода
[5].
Окно
сообщений выводит простейшую информацию (MsgBox), а окно ввода (InputBox)
обеспечивает ввод информации.
Функция
InputBox – окно с двумя кнопками ОК и Cancel, строкой сообщения и
полем ввода. Рассмотрим оператор, выдающий это окно на экран.
InputBox
(Prompt[,Title] [,Default] [,xPos] [,yPos] [,Helpfile, Context]),
где:
Title
– строковое выражение, отображаемое в строке заголовка окна;
Default
– строковое выражение, отображаемое в поле ввода по умолчанию, если
не ввести другое;
xPos
– расстояние по горизонтали между левой границей ДО и левым краем
экрана (если нет, то по центру горизонтали);
yPos
– расстояние по вертикали между верхней границей ДО и верхним краем
экрана (если нет, на 1/3 высоты экрана);
Helpfile
– адрес файла-справки о ДО, а Context – номер соответствующего раздела
в системе.
Пример:
Option
Explicit
Sub
Msg_Inp()
Dim
Response As Integer
Dim
Message As String
Dim
Default As String
Dim
Title As String
Dim
Help As String
Dim
Style As Integer
Dim
Ctxt As Integer
Message
= «Введите Фамилию, Имя и Отчество студента»
строка-
сообщение
Title=”Пример
окна для ввода”
Заголовок
окна
Default
= “Смирнов Игорь Александрович”
текст
по умолчанию
Responce
= InputBox (Message; Title; Default; 100; 100)
End
Sub