Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.41
Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.41

Теперь создадим коды, их вызывающие. Для каждой из кнопок Button напишем следующий код:

Call имяі () Call имя2 ()

Слово Call писать не обязательно. Таким образом, каждая процедура обработки событий Button_Click будет вызывать обе созданные нами общие процедуры. Одна из них выводит на Labeil знак (+), другая - на Label2 текст «плюс». В скобках необходимо указать значения аргументов а и Ь. Для кнопки Buttonl этими значениями будут " +" и " плюс", так как ее мы будем использовать для отображения плюса. Окончательно коды для Buttonl примут вид: Call имяі (" + "), Ca 11 имя2 ("плюс").

После щелчка Buttonl на надписи Labeil появится знак «+», а на Label2 - текст «плюс». Так же добавим значения аргументов и в остальные коды. Для Button2 - (" -") и ("минус"); для Button3 -(■*■) и ("умножение"); для Button4 - (" /") и ("деление"). В общих процедурах можно указывать несколько аргументов, причем их значения в вызывающих кодах записываются в той же последовательности.

Добавим в коды первой общей процедуры еще несколько аргументов:

(ByVal a As String, ByVal с As Color, ByVal h As Integer)

a - переменная (тип String), с - переменная (структура Color), h - переменная (тип Integer). Теперь код будет выглядеть так:

Private Sub имяі (ByVal a As String, ByVal с As Color, ByVal h Integer)

Labe11.Text = a

Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста

Функции

Labell. BackColor = с Label1. Height = h End Sub

Вызывающий код - Call имя1 (" + ", Color.Red, 40). Первый аргумент выводит на Labell знак (+), второй окрашивает Labell в красный цвет, третий меняет высоту Labell.

Функции

Функции также можно рассматривать как небольшие программы. Они получают данные, обрабатывают их и возвращают результат. С некоторыми функциями мы уже познакомились в главе 7: log, Pow, Sin, Acos и другие. К функциям относятся также рассмотренные ранее UCase и LCase, служащие для изменения регистра. Visual Basic .NET располагает большим количеством встроенных функций, но их можно создавать и самим. Однако между функциями и процедурами существуют различия. Функция, в отличие от процедуры, предназначена для выполнения одной конкретной задачи и потому возвращает только одно значение. В кодах функции необходимо указывать, какое именно значение она возвращает и тип данных. Синтаксис выглядит следующим образом:


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta