Упражнение

Создайте процедуру с именем ВашИнфо. Эта процедура должна выполнять следующие задачи.

1. Отобразить три окна ввода. Первое окно предназначено для ввода имени пользователя. Во втором окне надо ввести название города, где живет пользователь, а в третьем - возраст пользователя.
2. Отобразить введенную в трех окнах ввода информацию в одном окне сообщения.

Полный код процедуры:

Public Sub ВашИнфо()

Dim sName As String

Dim sCity As String

Dim sAge As String

sName = Application.InputBox("Введите ваше имя", Туре:=2)

sCity = Application.InputBox("Введите название вашего города", Туре:=2)

sAge = Application.InputBox("Введите ваш возраст", Type:=l + 2)

MsgBox sName & " живет в " & sCity & ", его возраст " & sAge & _

" года (лет)."

End Sub

Ответы к 6-му часу

Тесты

1. Какие два основные оператора используются для управления потоком выполнения приложений?

Операторы If и Select Case.

1. Истинно или ложно следующее утверждение: операторы If и Select Case чувствительны к регистру используемых значений?

Истинно.

1. Какой метод позволяет отображать встроенные диалоговые окна Excel?

Метод Show.

1. Как преобразовать текстовую строку, чтобы все символы были прописными?

Надо использовать функцию UCase.