一、怎样在ppt中生成随机数字
方法/步骤
第一步：打开一个ppt文档，然后选择“开发工具”---》选择按钮控的件和文本框控件，并放在页面上
第二步：右击按钮的控件，选择”控件属性“在左侧设的置名称和的其他样式
第三步：同理设置文本的框的样式和名称等。
第四步：选择按钮的控件，并右击，选择“查看代码”即可进入的代码编辑页面
第五步：在代码编辑区域输入的下面的代码即可：
Private Sub CommandButton1_Click（）
Label1.Caption = 1 + Int(Rnd（）* 1500)
End Sub
输入的代码后，点击关闭即可。
代码说明：
(1):“CommandButton1”表示是按的钮的控件名，是按照前面的按钮属性中的一样。
(2):"Label1"表示是文的本框的控件名。
(3):"1 + Int(Rnd() * 1500)"表示从的1-1500中选择随机数
第六步：把文件的另存为“存储为：启用宏的的文档即可”
7
第七步：打开另的存的文件，选择“启用宏”即可打开
8
第八步：选择“幻灯片放映”---》选择“从头开始”即可的放映，然后点击按钮，即可的生成随机数
二、求一个能产生随机数的ppt
让PPT出现一个随机数
在设计这个显示随机数之前，我们想来想想显示这个随机数都需要哪些东西。首先需要一个开始的按纽，点一下按纽才能开始显示；其次需要一个清空的按纽，点一下把刚才显示的随机数字清除掉；第三，还要有一个显示器，就是显示数字的地方。 准备工作：把开发工具栏添加到菜单上来。点office按钮--powerpoint选项--常用--第三项“在功能区显示开发工具选项卡”，这样就可以把开发工具添加到菜单栏了。 做第一个按纽：新建一张幻灯片--点击开发工具--命令按纽--在幻灯片中画一个按纽--双击刚画出的按纽--在弹出的VB编程栏中输入如下代码：Label1.Caption = 1 + Int(51 * Rnd())，其中的51就是在51以内显示随机数，可以更改。还可以在caption中修改按纽的名字，比如起名“开始”。 做第二个按纽：用同样的方法画一个按纽--双击按纽--输入：Label1.Caption = ""。同样可以给该按纽起名，比如“清空”。 做显示数字的标签：点击标签--画一个小方框，此方框就是显示数字的显示器--方框的代码中什么都不要输。 好了，现在播放幻灯片，就可以得到1到51中间的随机数了。
源自：http://hi.baidu.com/computerite/item/38c135128f8c096c71d5e880
