💸 Как сделать бизнес проще, а карман толще?

Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание, но и напоминать клиентам о визитах тоже. Проблема в том, что средняя цена по рынку за такой сервис — 800 руб/мес или почти 15 000 руб за год. И это минимальный функционал. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
⚡️ Для новых пользователей первый месяц бесплатно. А далее 290 руб/мес, это в 3 раза дешевле аналогов. За эту цену доступен весь функционал: напоминание о визитах, чаевые, предоплаты, общение с клиентами, переносы записей и так далее.
✅ Уйма гибких настроек, которые помогут вам зарабатывать больше и забыть про чувство «что-то мне нужно было сделать».
Сомневаетесь? нажмите на текст, запустите чат-бота и убедитесь во всем сами!

Цикл For..Next

Основна форма циклів в Visual Basic - цикл For,.Next. Він використовується для виконання визначеного кількість ітерацій. Цикли For..Next зазвичай використовуються для роботи з лічильниками і в інших ситуаціях, коли кількість ітерацій відома заздалегідь. Вони мають наступний синтаксис:

For «Лічильник=ПочатковеЗначення» To «КінцевеЗначення»

Дії, що повторюються

Next Лічильник

Незважаючи на простоту цього фрагмента, зверніть увагу на деякі обставини:

Змінна Лічильник має числовий тип (Integer або Long) і вказується програмістом (наприклад, I).

Початкове Значення визначає стан змінної, з якого починається відлік.

Кінцеве Значення визначає стан змінної, в якому відлік припиняється.

Наприклад, щоб змінна x в циклі набувала значень від 1 до 5, Лічильник замінюється на x, ПочатковеЗначення - на 1, а КінцевеЗначення - на 5. У першому рядку циклу For..Next може бути присутній ключове слово Step. Воно дозволяє змінити приріст лічильника (за умовчанням воно дорівнює 1). Наприклад, якщо значення лічильника кожного разу збільшується на 3, рядок For завершуватиметься Step 3. Якщо лічильник збільшується на 2, рядок завершується Step 2. У наступному фрагменті лічильник змінюється від 10 до 100 з приростом 5:

For I = 10 To 100 Step 5

‘ Дії, що повторюються

Next

Після ключового слово Next можна не вказувати ім'я змінної-лічильника. В цьому випадку цикл For..Next просто завершується ключовим словом Next. Більше того, тести показали, що без вказівки імені змінній програма виконується швидше. Проте код має бути структурований, щоб ви могли легко знайти відповідність між різними For і Next.

Лічильник навіть може змінюватися у зворотному напрямі. Для цього слід задати початкове значення більше кінцевого і вибрати негативний приріст після ключового слова Step. Наприклад, в наступному фрагменті лічильник змінюється від 10 до 1:

For I = 10 To 1 Step - 1

Дії, що повторюються

Next

А тут лічильник змінюється від 100 до 0 із зменшенням на 10:

For I = 100 To 0 Step - 10

‘ Дії, що повторюються

Next

Щоб вийти з циклу до того, як лічильник досягне кінцевого значення, скористайтеся командою Exit For. Наприклад:

For I = 1 To 100 Step 5

X = I * 10

If X > 100 Then

Exit For

End If

Next

Цикли For..Next зустрічаються в багатьох прикладах цієї книги. Так же часто він використовуватиметься і у вашій майбутній роботі.