InPutBox -
это специальное окошко, в которое
пользователь программы может
ввести данные для дальнейшей
обработки программы. Здесь мы как
раз с ним и разберемся:
- Создайте
форму, на ней кнопку.
- В ее коде
напишите:
Dim otvet As Variant
otvet = InputBox("Ваш вопрос", "Заголовок формы", "Значение по умолчанию")
Command1.Caption = otvet
- Как видите, с
первой и последней строчкой
разбираться не надо, вам и так
уже должно быть все понятно, а
вот о серединке стоит
поговорить, как раз в ней и
содержится наш InPutBox. Вот его
простая структура:
переменная
= InputBox("Ваш вопрос", "Заголовок формы", "Значение по умолчанию")
- Как видите все
очень просто, вы просто присваиваете
переменной значение которое
пользователь введет в окошко.
Так же можно присвоить значение
InPutBox'а какому-нибудь свойству,
например надпись на кнопке, для
этого надо написать такой код:
Command1.Caption = InputBox("Ваш вопрос", "Заголовок формы", "Значение по умолчанию")
- Вот и все!
Надеюсь вы разобрались!
|
|
|
