关于ppt按钮控件和文本控件的疑问求助

chen.zhenna 发表于: 2008-5-13 14:12 来源: 扑奔PPT网

初来乍到，有个问题，弄了2天，搞不懂是什么原因，看起来又似乎很简单。请教此地N人，问题如下：
一个command button控件，一个textbox，我希望点击了这个按钮之后，在文本框里面显示文字。

vba中语句如下：
Private Sub CommandButton1_Click()
If TextBox1.Text = "" Then
TextBox1.Text = "test"
Else
TextBox1.Text = ""
End If
End Sub

做完，是所要效果。将文件保存，再次放映，效果ok。但是只要把该文件关闭了，下次再次打开，就再没有效果了，似乎按钮已经不发挥作用。

请大家帮帮忙，告诉我，这究竟是怎么回事？

大家对关于ppt按钮控件和文本控件的疑问求助的评论

爱ppt的牛发表于 2008-5-13 20:43:02: 偶不太明白啊，惭愧了。
sdjnzrl 发表于 2008-5-13 23:36:16: 我刚来，不好意思，不太清楚。
chen.zhenna 发表于 2008-5-14 09:07:24: 这个效果在powerpoint2000里面运行很正常，但是在2003版本中缺失效，为什么呀？
gasx2007 发表于 2008-5-14 09:41:56: 把你的宏的安全性调整为"中"或"低"即可，
因为在PowerPoint2000中宏的安全性默认为“低”，而在PowerPoint2003中默认为“高”，也就是说禁止代码的运行。
具体见图

[ 本帖最后由 gasx2007 于 2008-5-14 09:50 编辑 ]

幻灯片4.JPG

幻灯片5.JPG
lcyjxjs 发表于 2008-5-14 23:07:39: 这时候，会提醒你保存，
TextBox1.Text = ""
这时候，textbox1.text=""已经成立了，系统执行后，等于没运行，哈哈，
加上一个清理的语句，就可以了
gchh 发表于 2008-5-15 18:54:16: 感谢你对本版支持
amwyq 发表于 2008-5-15 22:13:28: QUOTE:
原帖由 lcyjxjs 于 2008-5-14 23:07 发表
这时候，会提醒你保存，
TextBox1.Text = ""
这时候，textbox1.text=""已经成立了，系统执行后，等于没运行，哈哈，
加上一个清理的语句，就可以了
我认为1楼的代码没问题，呵呵，找别的原因吧！
yyz165360 发表于 2008-5-16 18:02:56: 代码没错啊？
怎么回事情？
znyrsx 发表于 2008-12-28 23:52:31: 我也碰到了同样的问题，请高手指点一下哈
blly 发表于 2009-3-21 01:22:27: 下载中，先顶一下。