This Command works almost too well, because it forces the text box to always
remain empty, and will not allow me to enter text at all. I can click on it
and the cusor begins to flash, however no characters will show up. But you
were right it doesn't matter if the slide clears after advanceing or when
returning.
> > Oh and one more question,
> > Is there a way to have the text box control object start blank whenever that
[quoted text clipped - 22 lines]
> PPTools: www.pptools.com
> ================================================
David M. Marcovitz - 20 Jun 2006 19:51 GMT
Yes, Steve's code will do that to you. You actually need to put the added
line in each section of the case statement because you only want the text
cleared after a correct word is entered. If you put it at the end of the
TextBox1_Change procedure, it will happen every time anything changes in
the text box (type a character and immediately clear a character). You
never have a chance to a whole word.
--David

Signature
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/
> This Command works almost too well, because it forces the text box to
> always remain empty, and will not allow me to enter text at all. I
[quoted text clipped - 32 lines]
>> PPTools: www.pptools.com
>> ================================================
Steve Rindsberg - 20 Jun 2006 20:50 GMT
> This Command works almost too well, because it forces the text box to always
> remain empty, and will not allow me to enter text at all. I can click on it
> and the cusor begins to flash, however no characters will show up. But you
> were right it doesn't matter if the slide clears after advanceing or when
> returning.
Kind of like Microsoft Security improvements. They don't make things any more
secure, they just keep you from doing the things that let insecurities creep in!
Only here we fess up and fix. ;-)
Forgot that this was in the change event, so
> > > Select Case TextBox1.Text
> > > Case "dog"
TextBox1.Text = ""
> > > ActivePresentation.SlideShowWindow.View.GotoSlide 5
> > > Case "cat"
TextBox1.Text = ""
> > > ActivePresentation.SlideShowWindow.View.GotoSlide 6
and so on.
That way it only blanks if something *triggers* a go to slide response.
> > > Case "cow"
> > > ActivePresentation.SlideShowWindow.View.GotoSlide 6
[quoted text clipped - 12 lines]
> > PPTools: www.pptools.com
> > ================================================
-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================