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

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

Оголошення змінної і встановлення типу даних

В Visual Basic існує декілька способів оголошення типу даних. Можна оголосити тип за допомогою префіксів та суфіксів, які ставляться в імені змінної. Можна за допомогою ключових слів:

Ключове слово змінна As тип

Ключове слово свідчить про те, що здійснюється оголошення змінної і вказує на область її використання. As – службове слово, яке використовується при встановленні типу даних для змінної, що оголошується, тип – тип змінної.

Оголошення змінної можна здійснити в тілі процедури ключовими словами Dim, Static. При цьому вона буде доступна тільки в межах даної процедури. Щоб змінна була доступна для всіх процедур даного модуля, її необхідно оголосити в розділі General Declarations ключовими словами Private або Dim. Якщо в розділі General Declarations оголосити змінну з ключовим словом Public, то вона буде доступна для всіх модулів поточного проекту.

Оголосимо змінну n з типом Double, змінну a з типом String в розділі General Declarations. Зі списку об’єктів вибираємо (General), зі списку подій вибираємо (Declarations). Вводимо наступні інструкції:

Dim n As Double
Dim a As String

Слід пам’ятати, що в тому випадку, коли тип змінної не визначено, Visual Basic цій змінній за умовчанням встановлює тип Variant. Якщо змінна неоголошена але використовується в процедурі, то вона є доступною тільки в даній процедурі.

Створіть на формі командну кнопку, при натисканні на яку відбувалося б наступне:

- змінна n набувала значення з текстового поля TextNbr:
n = TextNbr.Text

- змінна m набувала значення:
m = (n + 1) * 0.2

- властивість Text об’єкту TextMstr набувала значення змінної m:
TextMstr.Text = m

Запустіть проект і подивиться як працює створена кнопка.

Додайте на форму командну кнопку, при натисканні на яку відбувалося б наступне:

- змінна a набувала значення з текстового поля TextSstr:
a = TextSstr.Text

- змінна m набувала значення:
m = a & “ клас! ”

- властивість Text об’єкту TextMstr набувала значення змінної m:
TextMstr.Text = m

Запустіть проект і подивиться як працює створена кнопка.

Створення EXE-файлу

Для створення exe-файлу поточного проекту необхідно в пункті меню File вибрати команду Make Project .exe…, а потім в діалоговому вікні Make Project вибрати папку для збереження і вказати ім’я exe-файлу, натиснути кнопку Ok.

Створіть exe-файл з ім’ям MyFirst.exe у власній папці.

Збережіть проект, закрийте Visual Basic.

За допомогою програми Мой Компьютер відкрийте власну папку і завантажте створений додаток MyFirst.exe. Перевірте як він працює.