编写一个命令按钮

Question

我是PowerPoint VBA的新手。有人可以提供一些代码，这样如果我单击一个命令按钮，某些文本会显示在文本框中吗？

就像我说我是新手，只需要一个起点。

感谢。

Answer 1

对于Office 2003，右键单击工具栏并确保选中“控制工具栏”。

如果使用Office 2007+，请按照本指南进行操作

http://www.addintools.com/documents/powerpoint/where-is-control-toolbox.html

从“控制”菜单中在幻灯片上绘制命令按钮和文本框。

右键单击文本框并转到属性。检查Name属性 - 应该是“Textbox1”或类似 - 如果你现在只想记下它，你可以改变它，我们引用我们的新文本框实例。

双击按钮以显示宏编辑器。

编辑新创建的事件处理程序，使其包含以下行

Private Sub CommandButton1_Click()
    'Button Click event fired so alter the text property of our text box
    Textbox1.text = "Hello World"
End Sub

或者更改为文本框的名称。点击F5查看幻灯片。点击按钮时会出现文字。