PPT实现一个随机抽取单个名字的功能

IsaacZ

以PowerPoint 2007为例（2010及以上类似，2003直接“视图→工具栏→控件工具箱”即可）

打开PowerPoint，将文件保存为*.pptm格式（包含宏代码的演示文稿）
若没有“开发工具”选项卡，请打开

通过“开发工具”选项卡，插入一个文本框控件，和两个命令按钮控件

文本框控件：命名为“TextBox1”（选中控件，更改“属性”当中的“(名称)”）（IsaacZ注：好像这就是默认的名称）
命令按钮控件：一个命名为“开始”，另一个命名为“清除”（选中控件，更改“属性”当中的“Caption”）

可根据自己的需要，更改“文本框”以及“命令按钮”字体、字号等属性（IsaacZ注：右边的三个点按钮）

编写程序（示例）双击“开始”按钮，弹出程序编写框，在中间空白处输入以下内容：

1. <blockquote>Dim a As Integer

复制代码

可将“s = "后的内容改为自己需要的名字，注意三个字的不加空格，两个字的后面要加一空格

双击“结束”按钮，在中间空白处输入：

1. TextBox1.Text = ""
   

复制代码

这样便可以实现随机抽取姓名的功能。


IsaacZ注：有可能会抽取到之前已经抽到的名字。

metallbb

可能用不到，先收了，藏起来。