Передача данных при вызове подпрограммы
End Sub
End Sub
'****************************
Описание констант на уровне проекта:
Public Const Num1 As String = "Tomsk Polytechnic Univ."
'****************************
Sub UsingConst()
MsgBox Num1
'****************************
Передача аргументов из одной программы в другую осуществляется двумя способами:
· по ссылке (by reference);
· по значению (by value)
По ссылке– передается сама переменная (имя переменной), поэтому ее значение в подпрограмме можно изменить.
По значению– передается только значение переменной; изменить это значение в вызванной подпрограмме нельзя.
Выбор способа передачи – с помощью ключевых слов ByRef иByVal
При отсутствии в описании ключевых слов передача осуществляется по ссылке.
Пример: передача переменной по ссылке
Sub PassArgumentByReference()
Dim Username As String
Username = "Mike"
ChangeName Username
MsgBox Username