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