1. В меню Файл выберите Создать проект.
2. В диалоговом окне Создание проекта в области Шаблоны выберите Приложение Windows.
3. В поле Имя введите parameters и нажмите кнопку ОК.
Откроется новый проект Windows Forms.
4. С Панели элементов перетащите на форму два элемента управления Надпись.
5. Из панели элементов перетащите в форму элемент управления Button.
6. Дважды щелкните элемент управления Button, чтобы открыть редактор кода.
7. Сразу после строки End Sub обработчика событий Button1_Click добавьте следующую процедуру:
Function AddTwoNumbers(ByVal N1 As Integer, ByVal N2 As Integer) _ As Integer Return N1 + N2End Function 8. В процедуру Button1_Click добавьте следующий код:
Язык Visual Basic
Dim aNumber As Integer = CInt(Textbox1.Text)Dim bNumber As Integer = CInt(Textbox2.Text)MsgBox(AddTwoNumbers(aNumber, bNumber)) Этот код объявляет два целых числа и преобразует текст в двух текстовых полях к целочисленным значениям. Затем он передает эти значения функции AddTwoNumbers и выводит значение, возвращаемое в окне сообщения.
9. Нажмите клавишу F5 для запуска программы.
10. Введите число в каждом текстовом поле и нажмите кнопку. Добавляются два числа, и результат отображается в окне сообщения.
На следующем занятии будет рассказано, как использовать инструкцию For...Next для повторения действий.
