Информатика. Индришенок В.И - 5 стр.

UptoLike

-5-
фиксами после имени. Допустимые суффиксы, служащие для ав-
томатического назначения типов данных:
Суффикс % & ! # $ @
Тип Integer Long Single Double String Currency
Функции ввода данных и выдачи сообщений:
InputBox(приглашение[,заголовок][,начЗначение]),
где приглашение - любой текст в окне ввода, который д.б. туда
помещен программистом, заголовок - заголовок окна, начЗна-
чение - то, что будет введено автоматически (по умолчанию).
MsgBox(Текст[,Опция][,Заголовок]).
Эта функция возвращает значение, которое затем как-то исполь-
зуется
. Другой вариант:
MsgBoxТекст[,Опция][,Заголовок]
В этом варианте функция действует как оператор, т.е. не
возвращает никакого значения и просто выдает информацию в
окне сообщения. Текст - это строка сообщения, может содер-
жать до 1024 символов. Разбиение на строки и страницы реализу-
ется вставкой в текст сообщения символов переноса, возврата и
конца страницы (Например, Строка1$ & Chr(13) &
Chr(10) &Строка2$). Значение аргумента Опция является
целое число: Op1+Op2.При этом Op1 может принимать значе-
ния 16, 32, 48 или 64 и определяет вид сообщения и пикто-
грамму в окне сообщения: критическое сообщение, вопрос, пре-
дупреждение или информация. Аналогично Op2 принимает зна-
чения 0, 1, 2, 3, 4 или 5 и определяет, соответственно,
на-
бор кнопок в окне: OK, OK и отмена, стоп-повтор-пропустить,
да-нет-отмена, да-нет, повтор-отмена. Возвращаемое значение
- целое число от 1 до 7. Оно определяется однозначно нажатой
кнопкой. (Например, нет соответствует 7).
Пример: ввод фамилии, имени и отчества.
Private Sub Start_Click()
Dim Фамилия As String, Имя As String,_
Отчество As String, soob As String
Фамилия = InputBox("Введите, пожалуйста, _ Вашу
фамилию:", "Ввод фамилии")
Имя = InputBox("Введите, пожалуйста, _
Ваше имя:", "Ввод имени")
                             -5-

фиксами после имени. Допустимые суффиксы, служащие для ав-
томатического назначения типов данных:
 Суффикс    %     &      !     #              $        @
 Тип     Integer Long Single Double        String   Currency
− Функции ввода данных и выдачи сообщений:
InputBox(приглашение[,заголовок][,начЗначение]),
где приглашение - любой текст в окне ввода, который д.б. туда
помещен программистом, заголовок - заголовок окна, начЗна-
чение - то, что будет введено автоматически (по умолчанию).
MsgBox(Текст[,Опция][,Заголовок]).
Эта функция возвращает значение, которое затем как-то исполь-
зуется. Другой вариант:
MsgBoxТекст[,Опция][,Заголовок]
     В этом варианте функция действует как оператор, т.е. не
возвращает никакого значения и просто выдает информацию в
окне сообщения. Текст - это строка сообщения, может содер-
жать до 1024 символов. Разбиение на строки и страницы реализу-
ется вставкой в текст сообщения символов переноса, возврата и
конца страницы (Например, Строка1$ & Chr(13) &
Chr(10) &Строка2$). Значение аргумента Опция является
целое число: Op1+Op2.При этом Op1 может принимать значе-
ния 16, 32, 48 или 64 и определяет вид сообщения и пикто-
грамму в окне сообщения: критическое сообщение, вопрос, пре-
дупреждение или информация. Аналогично Op2 принимает зна-
чения 0, 1, 2, 3, 4 или 5 и определяет, соответственно, на-
бор кнопок в окне: OK, OK и отмена, стоп-повтор-пропустить,
да-нет-отмена, да-нет, повтор-отмена. Возвращаемое значение
- целое число от 1 до 7. Оно определяется однозначно нажатой
кнопкой. (Например, нет соответствует 7).
Пример: ввод фамилии, имени и отчества.
Private Sub Start_Click()
   Dim Фамилия As String, Имя As String,_
   Отчество As String, soob As String
     Фамилия = InputBox("Введите, пожалуйста, _ Вашу
   фамилию:", "Ввод фамилии")
     Имя = InputBox("Введите, пожалуйста, _
   Ваше имя:", "Ввод имени")