Сервис онлайн-записи на собственном Telegram-боте

Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое расписание, но и напоминать клиентам о визитах тоже. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
Для новых пользователей первый месяц бесплатно.

Чат-бот для мастеров и специалистов, который упрощает ведение записей:

— Сам записывает клиентов и напоминает им о визите;
— Персонализирует скидки, чаевые, кэшбэк и предоплаты;
— Увеличивает доходимость и помогает больше зарабатывать;

Начать пользоваться сервисом

Как продвинуть сайт на первые места?

Вы создали или только планируете создать свой сайт, но не знаете, как продвигать? Продвижение сайта – это не просто процесс, а целый комплекс мероприятий, направленных на увеличение его посещаемости и повышение его позиций в поисковых системах.

Ускорение продвижения

Если вам трудно попасть на первые места в поиске самостоятельно, попробуйте технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Если ни один запрос у вас не продвинется в Топ10 за месяц, то в SeoHammer за бустер вернут деньги.

Начать продвижение сайта

Події перемикачів

З декількох подій, пов'язаних з перемикачами, реально використовується тільки подія Click.

Зазвичай в програмах перевіряється властивість Value - по ньому можна дізнатися, в якому стані знаходиться перемикач. Визначивши стан, додаток виконує необхідні дії. Найчастіше властивість Value перевіряється в процедурі події Click кнопки, натиснутої після установки потрібного перемикача. Це дозволяє перевірити перед викликом наступної процедури деяку умову за допомогою конструкцій If.. End або Select Case.. End Select. Проте в деяких ситуаціях дія повинна виконуватися відразу після установки перемикача, і тоді доводиться перехоплювати подію Click. Розглянемо наступний приклад:

1. Запустіть проект Controls командою Run > Start.

2. Натисніть кнопку Option Buttons на формі Control Examples.

3. Клацніть на будь-якому перемикачі і подивитеся на напис у верхній частині форми. Властивість Caption напису змінюється в процедурі події Click відповідного перемикача.

4. Після перегляду результатів закрийте діалогове вікно кнопкою Close.

5. Завершіть додаток кнопкою Exit на формі Control Examples.

Щоб проглянути код цього прикладу, виконаєте наступні дії:

1. Двічі клацніть на формі frmOptions у вікні проекту, щоб активізувати її.

2. Двічі клацніть на перемикачі 486, щоб відкрити вікно програми. У вікні міститься наступний код:

Private Sub opt486_Click()

'присвоїти значення строкової змінної

strComputer = «486»

'викликати підпрограму

Call DisplayCaption

End Sub

Процедура події Click спочатку привласнює змінній strComputer значення 486, а потім викликає іншу процедуру, яка змінює текст напису. 3 Виберіть рядок (General) із списку в лівій верхній частині вікна (він називається списком об'єктів). Потім виберіть рядок (DisplayCaption) із списку процедур в правій верхній частині вікна. У вікні програми з'являється код процедури DisplayCaption:

Sub DisplayCaption()

' об'єднати текст напису з двома строковими змінними

lblDisplay. Caption = «Ви вибрали комп'ютер» & _

strComputer & «з системою» & strSystem

End Sub

Зверніть увагу - властивість Caption напису lblDisplay задається саме в цій процедурі, що викликається з процедури Click кожного перемикача.