Главная страница Случайная страница Разделы сайта АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
💸 Как сделать бизнес проще, а карман толще?
Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание, но и напоминать клиентам о визитах тоже.
Проблема в том, что средняя цена по рынку за такой сервис — 800 руб/мес или почти 15 000 руб за год. И это минимальный функционал.
Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.⚡️ Для новых пользователей первый месяц бесплатно. А далее 290 руб/мес, это в 3 раза дешевле аналогов. За эту цену доступен весь функционал: напоминание о визитах, чаевые, предоплаты, общение с клиентами, переносы записей и так далее. ✅ Уйма гибких настроек, которые помогут вам зарабатывать больше и забыть про чувство «что-то мне нужно было сделать». Сомневаетесь? нажмите на текст, запустите чат-бота и убедитесь во всем сами! Программирование циклических алгоритмов
Для программирования циклических алгоритмов используются операторы циклов. В VBA таких операторов несколько. Наиболее распространенными являются операторы While…Wend и For…Next. С их помощью можно запрограммировать циклические алгоритмы с предусловием (рис.5.1.). Принцип их работы: 1. Переменной цикла присваивается начальное значение. 2. Проверяется условие входа в цикл. Условие – это любое логическое выражение, операндом которого является переменная цикла. Если условие истинно, то выполняются Повторяющиеся действия (тело цикла). В противном случае цикл завершается, управление передается оператору, следующему за оператором цикла. 3. Значение переменной цикла изменяется. 4. Повторяются действия с шага 2. 5.1. Оператор цикла While…Wend
Синтаксис:
While < условие> < Повторяющиеся действия> Wend Например, фрагмент алгоритма может быть запрограммирован так:
k=1 While k< =N+1 y=k+N MsgBox “При k=” & CStr(k) & “ и N=”, & CStr(N) _ & “ значение y=”& CStr(y) k=k+0.5 Wend В качестве условия входа в цикл возможно использование любого логического выражения, в том числе и сложного. Например:
k=1 While k< =N+1 and N> 0 y=k+N MsgBox “При k=” & k & “ и N=”, & N _ & “ значение y=”& y k=k+0.5 Wend
Синтаксисом оператора не предусмотрено - присваивание начального значения переменной цикла; - изменение значения переменной цикла после выполнения повторяющихся действий. Поэтому эти действия программист должен предусмотреть сам. Если не присвоить переменной цикла начального значения, возможно невыполнение цикла или выполнение повторяющихся действий случайное число раз. При отсутствии модификации значения переменной цикла возникает ситуация бесконечного цикла. Для выхода из этой ситуации необходимо нажать клавишу Esc или одновременно две клавиши Ctrl + Break. Избежать подобного рода ошибок позволяет оператор цикла For…Next, т.к. установка начального значения переменной цикла и ее модификация предусматриваются его синтаксисом. 5.2. Оператор цикла For…Next Переменную цикла в операторе For…Next принято называть счетчиком. Синтаксис:
For < Счетчик> =< НачЗначение> То < КонЗначение> [Step < Приращение> ] < Повторяющиеся действия> Next [< Счетчик> ] Элементы синтаксиса: Счетчик – Обязательный. Переменная числового типа. Указывается программистом. НачЗначение – Обязательный. Определяет состояние переменной Счетчик, с которого начинается отсчет ее значения. КонЗначение – Обязательный. Определяет состояние переменной Счетчик, на котором отсчет ее значения прекращается. Step Приращение – Необязательный. Переменная числового типа. Позволяет изменять приращение счетчика (по умолчанию оно равно 1). Не допускается изменение значения переменной цикла внутри тела цикла, т.к. это приведет к ошибочным результатам. После ключевого слова Next можно не указывать имя переменной-счетчика. Более того, в этом случае программа будет выполняться быстрее. Однако для быстрого нахождения соответствия между For и Next, особенно при программировании вложенных циклов, имя переменной цикла все же лучше указывать. Например, фрагмент алгоритма будет запрограммирован с помощью оператора цикла For…Next так:
For i=1 To p y=x+1 Cells(1+i, 1)=i Cells(1+i, 2)=x Cells(1+i, 3)=y x=x+Dx Next В данном случае переменная цикла i изменяет свое значение от 1 до значения переменной p включительно с шагом 1. Шаг модификации значения переменной цикла i в данном случае в операторе цикла не указан, так как он равен 1 (по умолчанию). Т.е. будет получено p значений вычисляемой функции. Если бы шаг модификации значения переменной цикла был отличен от единицы, например, равен 2, заголовок оператора цикла For выглядел бы так: For i=1 To p Step 2 Значение Счетчика может изменяться в обратном направлении. Для этого следует задать начальное значение больше конечного и выбрать отрицательное приращение значения счетчика. Например:
For i = N To 1 Step -1 < Повторяющиеся действия> Next
В качестве значений элементов синтаксиса оператора For…Next могут быть использованы любые числовые выражения. Во всех предыдущих примерах это были целые числа, но возможно использование и вещественных чисел. Например: Ø For i = 1 To N Step 0.2 y = x + 1 MsgBox " i=" & i & " y=" & y Next шаг изменения значения переменной цикла равен 0, 2. Результат второго вычисления для переменной x, равной 4, представлен на рисунке. Ø For i = 1.5 To 3 y = x + 1 MsgBox " i=" & i & " y=" & y Next будет получено два результата: для i=1.5 и i=2.5 Ø For i = 1.5 To 3.7 Step 0.5 y = x + 1 MsgBox " i=" & i & " y=" & y Next будет получено пять результатов: для i=1.5, i=2, i=2.5, i=3 и i=3.5. Преимущество оператора цикла For…Next очевидно. Поэтому его использование предпочтительнее. Однако его применение возможно только в том случае, когда в качестве условия входа в цикл используется простое логическое выражение.
|