Создайте отчёт по игре-викторине PPT — проценты, количество правильных ответов | Учебное пособие ... скачать в хорошем качестве

Создайте отчёт по игре-викторине PPT — проценты, количество правильных ответов | Учебное пособие ...

Скачать код: https://pptvba.com/quiz-game-percentage/ Скачать файл: https://pptvba.com/quiz-game-percentage/ ================= В этом уроке Microsoft PowerPoint мы будем использовать Visual Basic Coding (VBA Coding) и создадим интерактивную игру-викторину, которую могут использовать преподаватели и в онлайн-курсах. Мы создадим слайд с оценочным листом/отчётом, на котором будут отображаться: 1. Количество правильных ответов. 2. Количество неправильных ответов. 3. Количество решённых вопросов. 4. Общее количество вопросов. 5. Баллы 6. Проценты Скачать файл PPTM и код: http://tutorials.bhaveshshaha.com/dow... ============================================= Часть 1: Я покажу вам, как создать интерактивную игру-викторину с подсчётом баллов в PowerPoint, используя код Visual Basic или VBA.    • How to make PowerPoint Interactive Quiz Ga...   Часть 2: Мы добавим метки для количества правильных и неправильных ответов, общего количества вопросов и количества пройденных вопросов. Мы также будем отображать набранные баллы и проценты. Мы также позволим пропускать вопросы и повторно проходить викторину.    • Make PPT Quiz Game Report Card - percentag...   Часть 3: Мы добавим слайд с сертификатом, содержащий имя и местоположение пользователя. Затем мы распечатаем слайд с сертификатом и слайд с результатами и сохраним его в формате PDF.    • Print Certificate with student's NAME | In...   ============================================ Будьте ответственны за следующую часть. Оставляйте комментарии к любому из моих видео, если у вас есть какие-либо предложения! Оставьте комментарий ниже, если у вас есть какие-либо сомнения. Я также работаю фрилансером и создаю игры и шаблоны PowerPoint на заказ. Свяжитесь со мной для получения дополнительной информации. =========================================== КОД: Подпись Верно() Очки.Подпись = (Очки.Подпись) + 10 Подпись CA = (Подпись CA) + 1 Вывод = MsgBox("Ваш ответ правильный, молодец!", vbOKOnly, "Верный ответ") ActivePresentation.SlideShowWindow.View.Next Конец подсказки Подпись Неверно() Очки.Подпись = (Очки.Подпись) - 5 Подпись WA = (Подпись WA) + 1 Вывод = MsgBox("Ваш ответ неправильный.", vbOKOnly, "Неверный Ответ") ActivePresentation.SlideShowWindow.View.Next Конец подпрограммы Сброс подпрограммы() CA.Caption = 0 WA.Caption = 0 PQ.Caption = 0 TQ.Caption = 0 Points.Caption = 0 Percentages.Caption = 0 ActivePresentation.SlideShowWindow.View.Exit Конец подпрограммы ВычислитьРезультаты() TQ.Caption = 6 PQ.Caption = (TQ.Caption) - (CA.Caption) - (WA.Caption) Проценты.Caption = (CA.Caption) * 100 / (TQ.Caption) ActivePresentation.SlideShowWindow.View.Next Конец подпрограммы Повторить подпрограмму() CA.Caption = 0 WA.Caption = 0 PQ.Caption = 0 TQ.Caption = 0 Points.Caption = 0 Percentages.Caption = 0 ActivePresentation.SlideShowWindow.View.GotoSlide (1) End Sub =========================================== Бхавеш Шаха, [email protected]    / bhaveshshaha   www.instagram.com/basicallybhavesh