1 / 12

Team One

Score Board. Team One. Team Two. Team Three. Team Four. Team Five. Team Six. Team Seven. Team Eight. Timer Bar. 8. 20. 1. Pop-up Boxes. Use popup boxes to apply the contiguity principle when combing text & graphics.

ecarolin
Télécharger la présentation

Team One

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. Score Board Team One Team Two Team Three Team Four Team Five Team Six Team Seven Team Eight

  2. Timer Bar 8 20 1

  3. Pop-up Boxes Use popup boxes to apply the contiguity principle when combing text & graphics Place a ‘no fill’ action button over graphic image, group them, then animate the grouped button with emphasis

  4. 10 75 65 55 The Big Wheel 25 100 15 45 50 Spin Wheel Spin wheel

  5. Drag & Drop (uses the dragdrop macro) See introduction to writing macros in Visual Basic in MS Office applications at http://www.steverindsberg.com/pptlive/

  6. Using the Exit animation following every mouse click on a specific square

  7. Drag & drop

  8. Connect 4 Drag & Drop

  9. Score box Wrong answer 0 Right answer Reset score • The action buttons in this slide use the Visual Basic Macros (see below) to change the score displayed in the scorebox. Select Developer/Macros/Edit to see macros in the Visual Basic Editor • Sub pointSubstract() • score = Val(ActivePresentation.SlideShowWindow.View.Slide.Shapes("scorebox").TextFrame.TextRange.Text) • ActivePresentation.SlideShowWindow.View.Slide.Shapes("scorebox").TextFrame.TextRange.Text = score - 1 • End Sub • Sub pointAdd() • score = Val(ActivePresentation.SlideShowWindow.View.Slide.Shapes("scorebox").TextFrame.TextRange.Text) • ActivePresentation.SlideShowWindow.View.Slide.Shapes("scorebox").TextFrame.TextRange.Text = score + 1 • If score => 10 Then MsgBox "You win!" • End Sub • Sub Resetscorebox() • ActivePresentation.SlideShowWindow.View.Slide.Shapes("scorebox").TextFrame.TextRange.Text = 0 • End Sub • Code written by Allan Jeong, February 2010 • Learn how to write macros in Visual Basic in MS Office applications at http://www.steverindsberg.com/pptlive/

  10. Place Your Multiple Choice Question Here Which Answer Below is Correct? - Robie Knows! 25 19 22 2 21 30 29 28 1 26 24 23 27 3 4 20 6 18 17 5 15 14 13 16 11 10 9 8 7 12 Back Next Correct Answer Robie Says – Great Job! Incorrect Answer1 Robie Says – Try Again Incorrect Answer2 Robie Says – Try Again Incorrect Answer3 Robie Says – Try Again

  11. Roll Dice (not working) Roll Die

  12. Roll Dice (not working) 0 3 3 2

More Related