Для чего нужна процедура Sub?
Категория реферата: Рефераты по информатике, программированию
Теги реферата: бесплатные шпаргалки, реферат личность
Добавил(а) на сайт: Фавста.
Предыдущая страница реферата | 1 2
Loop
MsgBox Stroka выводим отредактированную строку на экран
End Sub
А теперь представте, что эти строки Вам нужны более одного раза и в разных местах !
Не проще ли написать подпрограмму, которая это делает и потом просто вызывать её? Так, пишем (вне модуля):
Public Sub RemSym(Stroka, Symbol)
Do
ReturnNumber = InStr(1, Stroka, Symbol): If _
ReturnNumber = 0 Then Exit Do
Stroka = Left(Stroka, ReturnNumber - 1) + Right _
(Stroka, Len(Stroka) - ReturnNumber)
Loop
MsgBox Stroka
End Sub
Вот так, а теперь можно просто вызывать эту подпрограмму и передать значения строки и символа:
RemSym Stroka, Symbol
и из любого места!
Скачали данный реферат: Циммерман, Севастьян, Foteev, Килессо, Майя, Палагута, Лилия.
Последние просмотренные рефераты на тему: курсовая работа по менеджменту, реферат финансы, недвижимость реферат, древняя греция реферат.
Предыдущая страница реферата | 1 2