Для чего нужна процедура Sub
?
Если Вы уже читали моё объяснения процедуры Function, то Вы поймёте Sub ёще быстрее! В общем так, Sub это то же самое, что и Function, только она не возвращает значение, а производит какое-нибудь действие. Например вывод на экран сообщения или манипулирование несколькими свойствами. Например MsgBox. Это тоже подпрограмма. Например: Msgbox ("Привет!", ,"Заголовок") Msgbox - это имя подпрограммы. А "Привет!" и "Заголовок" это передаваемые значения. Т.е. подпрограмма Msgbox выводит окно на экран с текстом "Привет!" и заголовком "Заголовок". Теперь допустим, что Вам нужно, чтобы ваша программа вырезала из передаваемых строк все заданные символы (возьмём мой пример из "Практики"): Sub Main() 'объявляем
переменную для строки
'получаем
строку, по умолчанию стоит строка
'запускаем
цикл
Loop MsgBox Stroka 'выводим отредактированную строку на экран End Sub А теперь представте, что
эти строки Вам нужны более одного раза и в разных местах !
Public
Sub RemSym(Stroka, Symbol)
Вот так, а теперь можно просто вызывать эту подпрограмму и передать значения строки и символа: RemSym Stroka, Symbol и из любого места! |