Создать форму для приема заказа в кафе

@Harderon · Регистрация: 19.04.2020

Студворк — интернет-сервис помощи студентам

Создать форму для приема заказа в кафе. Каждого наименования должно быть минимум 5 шт. Соблюсти следующие условия:

1. Выводить квитанцию заказа в ListBox на вкладке «Чек заказа». В квитанции должны содержаться все данные из формы, рассчитаны стоимости по каждой позиции заказа и итоговая стоимость заказа с учетом всех скидок (цены определяются реальные произвольные);

2. После нажатия кнопки «Оформить заказ» все заполненные поля очищаются;

3. Очищать ListBox каждый раз от предыдущего заказа;

4. Скидка на первый заказ – 10%, Персональная скидка – 5% от стоимости заказа с учетом всех других скидок

Размер шрифта проставляется в свойстве Font

Интерфейс приложения для оформления заказов приведен ниже (во вложении)

Помогите пожалуйста

@Pro_grammer · 15.06.2020, 21:33

Сообщение от vedunasv

И будет ли у вас настроение еще раз глянуть мои шедевры?

Глянул. Работа проделана серьёзная, я бы даже сказал достойная оплаты, как минимум за труды.
Не работает у меня Чек заказа, засвечена плёночка:

Естественно не вдавался в подробности расчетов, добавления блюд и т.д и т.п. Столько пощёлкал по клавишам, выбирал из того, что есть в базе

@vedunasv · 15.06.2020, 21:50

Pro_grammer, хм...
Менб выьрано? проверьте на супах.
Чек выдатется после нажатия кнопы "УТВЕРДИТЬ ЗАКАЗ" - автопереход на чек
и он дожен белый фон. Посмотрите выще образец на форуме

попробуйте цветом фона поиграться

@Pro_grammer · 15.06.2020, 21:54

Сообщение от vedunasv

проверьте на супах.
Чек выдатется после нажатия кнопы "УТВЕРДИТЬ ЗАКАЗ" - автопереход на чек

На них родимых и проверял. Кнопу жал, автопереход наблюдал. Чек не наблюдал.

@vedunasv · 15.06.2020, 21:56

вот только отработался чек

@vedunasv · 15.06.2020, 21:59

Pro_grammer,
экзешник или в среде VB ?

Добавлено через 1 минуту
1. запустить
2. нажать ОФОРМИТЬ ЗАКАЗ
3. выбрать блюдо
4. указать количество (ниже)
5. нажать УТВЕРДИТЬ ЗАКАЗ

фон чека чисто чёрный????

и черными буквами
хи-хи-хи

ЭТО ЧЁРНЫЙ СПИСОК ДОЛЖНИКОВ ха=ха=ха

@Pro_grammer · 15.06.2020, 22:01

Пришлось лезть в код. Как можно увидеть надписи на oChek, если в свойствах Label указан черный цвет фона и черный цвет шрифта?
Это диверсия, не иначе! Изменил фон на белый и заработало.

@vedunasv · 15.06.2020, 22:07

Pro_grammer, Чудеса бывают

Добавлено через 1 минуту
Pro_grammer, у меня сразу белый.... несовместимость или

Сообщение от Pro_grammer

Это диверсия, не иначе! Изменил фон на белый и заработало.

во вчеряшнем ответе -видно, что чек белый )))))

Добавлено через 1 минуту
Pro_grammer, осталось Заказчика найти ((((((( снова через неделю появится....

@Pro_grammer · 15.06.2020, 22:08

Сообщение от vedunasv

Чудеса бывают

Это не чудо, а карма нерадивому студенту. Тяжело бы ему пришлось, если бы не я.

@vedunasv · 15.06.2020, 22:10

Pro_grammer, Можете заказывать новое блюдо (в третьей странице), потом купите

Добавлено через 1 минуту
Pro_grammer, ага, карма....
но у меня обещание ему за мою оплошность скоротить код, если у его товарища будет время до сдачи

@Pro_grammer · 15.06.2020, 22:11

Сообщение от vedunasv

во вчеряшнем ответе -видно, что чек белый )))))

Я тот екзешник запускал из вчерашнего архива, сам не компилировал.

@vedunasv · 15.06.2020, 22:23

Но базу я принципиально НЕ НАБИРАЮ!!!!
Ттолько для проверки

Добавлено через 1 минуту

Сообщение от Pro_grammer

Я тот екзешник запускал из вчерашнего архива, сам не компилировал.

На форуме образец выполения программы -специально выведены для для Великих Цензоров Pro_grammer, )))))
что никаких хитростей, только ловкость ИИ (временно дистанционно меняю коды, телепатически)

Добавлено через 6 минут
у пеня выбран BackColor=9& из системной палитры
может быть надо на будущее выбирать через константу vbwhite
такого мне не попадалось. Хотя оттенки менялись на разных компах

Добавлено через 2 минуты
Pro_grammer, Вы для архива подменили или мне скорректировать архив с учетом цвета фона чека?

@vedunasv · 15.06.2020, 22:39

Harderon, появилась версия архива "harderon3.rar" v=51 501 байт.

ПРИЧИНА: на некоторых компах цвет фона ЧЕК чёрный вместо белого. Выбор автоматического цвета переложен на ручной в виде константы белого цвета в самом коде.

Возможно, в случае неудачной корректировки данной версии придется поменять также цвет текста ЧЕКА - вместо черного выбрать какой-то другой. Но это потом.
HARDERON3.rar

@ibecatro · 11.03.2022, 11:44

Всем привет , и надеюсь , что кто нибудь ответит
Меня зовут илья
я взял исходник отсюда так как у меня похожее задание
но изменить не могу , может проблема в том что я делаю это всё в excle и версия отличается , может из за такого , что я просто туплю
помогите мне решить эту задачку , очень нужно
а если у кого то есть время на меня
то я буду очень благодарен , если поможете сделать программу
хотя бы объяснить как написать код на нее
ибо я не понимаю

калькулятор который был в задании , я сделал , там просто намного легче , чем эти заказы

@Argus19 · 11.03.2022, 18:08

Сообщение от ibecatro

я взял исходник отсюда

Исходник написан на VB 6.0. Чтобы использовать код VBA, надо создать аналогичную форму в Excel и аккуратно скопировать коды событий. Тогда заработает.

Новые блоги и статьи Все статьи Все блоги /
Транслитерация текста с кириллицы на латиницу (вариант №2) Maks 13.11.2026 Обновленная версия ранее созданной обработки. Добавлено: - Проверка исходного текста на кириллицу, через обращение к стандартной функции "ТолькоКириллицаВСтроке" из общего модуля. . .	Часы с термометром и праздничным календарем yariko 12.11.2026 Сегодня мы рассмотрим как можно сделать отличные многофункциональные часы. Итак, поставим конкретную задачу: разработать часы с календарем, двумя термодатчиками, выводом поздравительных сообщений. . .	Транслитерация текста с кириллицы на латиницу (вариант №1) Maks 11.11.2026 Решил облегчить жизнь себе и коллегам админам при создании электронных почтовых ящиков для пользователей, в результате написал обработку "Транслитерация текста" с кириллицы на латиницу, а в ней. . .	Книги по геймдизайну, левел-дизайну, игровым механикам и проектированию игрового опыта 8Observer8 08.11.2026 Содержание блога \| English Version 1. 2003 - 06 - Designing Virtual Worlds (1st Edition) Автор: Richard A. Bartle \| Объем: 768 стр. Ссылки: Amazon . . .
Родители токсичные абьюзеры по отношению к своим детям ругают их оскорбляют не любят zorxor 08.11.2026 Жить в атмосфере постоянных оскорблений, критики и холодности со стороны родителей — это тяжелое и болезненное испытание, которое оставляет глубокие эмоциональные раны. Токсичное и абьюзивное. . .	Как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Ответ от Джемени ИИ. zorxor 08.11.2026 Джемени, как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Многие люди, возвращаясь домой, сразу переодеваются в максимально свободную одежду или вовсе предпочитают. . .	Паттерн очереди действий/команд (Action / Command Queue). Система очереди действий и кат-сцен с SDL3 Callbacks, cglm и OpenGL 8Observer8 07.11.2026 Содержание блога \| English Version Руководство для начинающих по реализации паттерна очереди действий/ команд (Action / Command Queue) на C++ (C++20) с использованием официального SDL3 Callbacks. . .	Проверка полного ФИО в типовом справочнике Maks 07.11.2026 Решение реализовано в конфигурации КА2, на примере справочника "КонтактныеЛицаПартнеров". Задача: Запрет инициалов. Не допускаеть использование сокращений вида "И. И. ", "И. И. ", "И И" и. . .

@Harderon 1 / 1 / 0 Регистрация: 19.04.2020 Сообщений: 9

	Создать форму для приема заказа в кафе 08.06.2020, 00:22. Показов 6825. Ответов 33 Метки visual basic (Все метки) Создать форму для приема заказа в кафе. Каждого наименования должно быть минимум 5 шт. Соблюсти следующие условия: 1. Выводить квитанцию заказа в ListBox на вкладке «Чек заказа». В квитанции должны содержаться все данные из формы, рассчитаны стоимости по каждой позиции заказа и итоговая стоимость заказа с учетом всех скидок (цены определяются реальные произвольные); 2. После нажатия кнопки «Оформить заказ» все заполненные поля очищаются; 3. Очищать ListBox каждый раз от предыдущего заказа; 4. Скидка на первый заказ – 10%, Персональная скидка – 5% от стоимости заказа с учетом всех других скидок Размер шрифта проставляется в свойстве Font Интерфейс приложения для оформления заказов приведен ниже (во вложении) Помогите пожалуйста Миниатюры 1

@vedunasv Наивное Существо 666 / 141 / 27 Регистрация: 09.05.2020 Сообщений: 750 Записей в блоге: 15
	15.06.2020, 21:50
	Pro_grammer, хм... Менб выьрано? проверьте на супах. Чек выдатется после нажатия кнопы "УТВЕРДИТЬ ЗАКАЗ" - автопереход на чек и он дожен белый фон. Посмотрите выще образец на форуме попробуйте цветом фона поиграться 0

@vedunasv Наивное Существо 666 / 141 / 27 Регистрация: 09.05.2020 Сообщений: 750 Записей в блоге: 15
	15.06.2020, 21:56
	вот только отработался чек 0

@vedunasv Наивное Существо 666 / 141 / 27 Регистрация: 09.05.2020 Сообщений: 750 Записей в блоге: 15
	15.06.2020, 21:59
	Pro_grammer, экзешник или в среде VB ? Добавлено через 1 минуту 1. запустить 2. нажать ОФОРМИТЬ ЗАКАЗ 3. выбрать блюдо 4. указать количество (ниже) 5. нажать УТВЕРДИТЬ ЗАКАЗ фон чека чисто чёрный???? и черными буквами хи-хи-хи ЭТО ЧЁРНЫЙ СПИСОК ДОЛЖНИКОВ ха=ха=ха 0

@Pro_grammer 6807 / 2840 / 527 Регистрация: 24.04.2011 Сообщений: 5,308 Записей в блоге: 10
	15.06.2020, 22:01
	Пришлось лезть в код. Как можно увидеть надписи на oChek, если в свойствах Label указан черный цвет фона и черный цвет шрифта? Это диверсия, не иначе! Изменил фон на белый и заработало. 0

@vedunasv Наивное Существо 666 / 141 / 27 Регистрация: 09.05.2020 Сообщений: 750 Записей в блоге: 15
	15.06.2020, 22:10
	Pro_grammer, Можете заказывать новое блюдо (в третьей странице), потом купите Добавлено через 1 минуту Pro_grammer, ага, карма.... но у меня обещание ему за мою оплошность скоротить код, если у его товарища будет время до сдачи 0

@vedunasv Наивное Существо 666 / 141 / 27 Регистрация: 09.05.2020 Сообщений: 750 Записей в блоге: 15
	15.06.2020, 22:39
	Harderon, появилась версия архива "harderon3.rar" v=51 501 байт. ПРИЧИНА: на некоторых компах цвет фона ЧЕК чёрный вместо белого. Выбор автоматического цвета переложен на ручной в виде константы белого цвета в самом коде. Возможно, в случае неудачной корректировки данной версии придется поменять также цвет текста ЧЕКА - вместо черного выбрать какой-то другой. Но это потом. HARDERON3.rar 0

@ibecatro 0 / 0 / 0 Регистрация: 26.02.2022 Сообщений: 1
	11.03.2022, 11:44
	Всем привет , и надеюсь , что кто нибудь ответит Меня зовут илья я взял исходник отсюда так как у меня похожее задание но изменить не могу , может проблема в том что я делаю это всё в excle и версия отличается , может из за такого , что я просто туплю помогите мне решить эту задачку , очень нужно а если у кого то есть время на меня то я буду очень благодарен , если поможете сделать программу хотя бы объяснить как написать код на нее ибо я не понимаю калькулятор который был в задании , я сделал , там просто намного легче , чем эти заказы Миниатюры 0