Введение 8 Этапы создания Windowsприложения 8
 Скачать 6.98 Mb.
|
11.2. Передача параметров по ссылке и по значениюВ Visual Basic 2005 существует два режима передачи параметров в подпрограмму: передача по значению и передача по ссылке. Когда параметр передается по значению, перед его именем ставится ключевое слово ByVal. В этом случае в подпрограмму передается копия параметра. Любые изменения значения данного параметра, выполненные в теле подпрограммы, теряются при возвращении в вызывающую программу. Другими словами, изменение копии параметра не отображается на оригинале. Как правило, по значению передаются входные параметры. Параметр, передаваемый по ссылке, обозначается ключевым словом ByRef. В этом случае в подпрограмму передается ссылка на область памяти, в которой хранится оригинальное значение данного параметра (иногда грубо говорят, что в подпрограмму передается оригинал параметра). При этом любое изменение значение параметра в теле подпрограммы сразу записывается в память компьютера на место старого значения параметра. Таким образом, после завершения работы подпрограммы в памяти хранится измененное значение параметра. Другими словами, передача параметра по ссылке позволяет сохранить в памяти компьютера измененное значение параметра. Выходные параметры могут передаваться только по ссылке. Рассмотрим пример использования различных режимов передачи параметров. Сначала проанализируем используемые подпрограммы. Процедура print предназначена для вывода значения целочисленной переменной в окно списка. У нее два входных параметра: stroka – это поясняющий текст, который будет выводиться перед значением переменной, znach – значение, которое надо вывести. Это значение может быть только целым числом. Так как обе переменных в процессе вывода не меняют своих значений, то они передаются по значению. Перед их именами ставим ключевое слово ByVal. Обратите внимание, что по правилам языка Visual Basic 2005 режим передачи указывается отдельно для каждого параметра. Private Sub print(ByVal stroka As String, _ ByVal znach As Integer) В окно списка lstA выводим поясняющий текст и значение, которое предварительно преобразуем с помощью функции Str. lstA.Items.Add(stroka + Str(znach)) End Sub Следующая процедура иллюстрирует передачу параметра по значению. Ее единственный параметр – целочисленная переменная a. Перед ней стоит ключевое слово ByVal, которое показывает, что параметр передается по значению. Private Sub Test1(ByVal a As Integer) К переменной a добавляем число 5 и записываем результат на место старого значения этой же переменной. a += 5 Выводим значение переменной a в окно списка, указывая в поясняющем тексте имена процедуры и переменной. print("Sub Test1 a=", a) End Sub Третья процедура иллюстрирует передачу параметра по ссылке. Ее единственный параметр – целочисленная переменная a. Перед ней стоит ключевое слово ByRef, которое показывает, что параметр передается по ссылке. Private Sub Test2(ByRef a As Integer) К переменной a добавляем число 5 и записываем результат на место старого значения этой же переменной. a += 5 Выводим значение переменной a в окно списка, указывая в поясняющем тексте имена процедуры и переменной. print("Sub Test2 a=", a) End Sub Теперь рассмотрим текст вызывающей (или главной) программы. Объявляем целочисленную переменную a. Dim a As Integer Присваиваем ей начальное значение. a = 2 Очищаем окно списка от результатов предыдущих запусков программы. lstA.Items.Clear() Выводим поясняющий текст. Сначала рассмотрим передачу параметра по значению. lstA.Items.Add("ByVal") Выводим в окно списка значение переменной a, хранящееся в главной программе. print("Main prog. a=", a) Вызываем процедуру Test1, в которую параметр a передается по значению. Test1(a) Печатаем значение переменной a после выполнения процедуры. print("Main prog. a=", a) Еще раз вызываем процедуру Test1. Test1(a) И снова печатаем значение переменной a, полученное после выполнения процедуры. print("Main prog. a=", a) Третий раз вызываем процедуру Test1. Test1(a) И третий раз печатаем значение переменной a. print("Main prog. a=", a) Выводим горизонтальную черту, чтобы зрительно отделить результаты одной подпрограммы от результатов другой. lstA.Items.Add("----------------------------------") Опять задаем начальное значение переменной a. a = 2 Выводим поясняющий текст. Теперь мы рассматриваем передачу параметра по ссылке. lstA.Items.Add("ByRef") Выводим в окно списка значение переменной a, хранящееся в главной программе. print("Main prog. a=", a) Вызываем процедуру Test2, в которую параметр a передается по ссылке. Test2(a) Печатаем значение переменной a после выполнения процедуры. print("Main prog. a=", a) Еще раз вызываем процедуру Test2. Test2(a) И снова печатаем значение переменной a, полученное после выполнения процедуры. print("Main prog. a=", a) Третий раз вызываем процедуру Test2. Test2(a) И третий раз печатаем значение переменной a. print("Main prog. a=", a) Пример работы этой программы приведен на рис. 70. Проанализируем полученные результаты. В первом блоке параметр передавался по значению. При этом изменения значения параметра, происходящие в теле подпрограммы, не влияют на значение соответствующей переменной в вызывающей программе. Это прекрасно видно на рис. 70. Сначала в главной программе переменная a имеет значение 2. Внутри процедуры Test1 к ней прибавляется число 5, и значение параметра становится равным 7. Но при возвращении в вызывающую программу этот результат теряется, и значение переменной a по-прежнему равно 2. Этот процесс повторяется трижды.  Рис. 70. Передача параметров по значению и по ссылке Иначе происходит передача параметра по ссылке. Это иллюстрирует второй блок результатов (рис. 70). Сначала в главной программе переменная a имеет значение 2. Внутри процедуры Test2 к ней прибавляется число 5, и значение параметра становится равным 7. Так как параметр a передается в процедуру Test2 по ссылке, то любые изменения его значения, происходящие в подпрограмме, сохраняются при возвращении в вызывающую программу. Что мы и видим в четвертой строке второго блока. Измененное значение переменной a еще два раза передается в подпрограмму Test2, где к ней добавляется число 5. Так как параметр a передается по ссылке, то измененный результат всякий раз будет сохраняться в главной программе. |