Введение в информатику процессов первичной переработки нефти. Новиков А.А - 69 стр.

UptoLike

Составители:

Рубрика:

Рис. 2.13. Пример работы программы Pro18

2.8.4. Передача данных при вызове подпрограммы

Вызывая подпрограмму, Вы вправе передать в нее переменные или значения.

Эта возможность еще более расширяет область применения подпрограмм, позволяя

выполнять одни и те же действия с различными исходными данными. Рассмотрим в

качестве примера подпрограмму DisplMess. Сейчас она выводит сообщение «Мо-

лярная масса нефти в ячейку А1 введена».

Предположим, что кроме этого мы хотим знать, какое именно значение было

введено. Проще всего передать в подпрограмму DisplMess аргумент. Это можно

сделать двумя способами (рис. 2.14).

Sub Pro19()

Dim R1 As Range

Set R1 = Worksheets(1).Range("A1")

R1.Value = 126

DisplMess2 R1.Value

End Sub

Sub DisplMess2(V1)

MsgBox " Молярная масса нефти " & V1 & "г/моль в ячейку А1 введена"

End Sub

Рис. 2.14. Пример работы программы Pro19

Здесь есть два интересных момента. Во-первых, обращение к подпрограмме

DisplMess2 в Рro19 содержит аргумент R1.Value, во-вторых, в первой строке