Ужин на скриптах
Искал я тут книги по скриптовому языку Powershell. В любимом книжном магазине товар был в наличии, но при заказе оказалось, что ждать придётся от недели до трёх. Меня это не устроило и я решил поискать по другим площадкам. И вот оно - реклама наконец-то оказалась полезной: появилась ссылка на всем известную площадку Лит**с. Цена приятно удивила и я решил - надо брать! Быстро установил приложение и забил в поиск ключевое слово. Результат мнения просто поразил:
Ну все, теперь я и сыт буду и скрипты научусь писать!

Option Explicit
Sub Сварить_макароны ()
Dim Таймер, Time, Time As Long
Dim Макароны As Integer
If Time >= Таймер And Макароны <> "Готово" Then
MsgBox "Недоварено"
Else Call Sub Слить_воду
MsgBox "Кушать подано!"
End If
End Sub