在一个页面中让ppt随机显示学生名字
(2019-08-19 14:26:04)
标签:
ppt随机显示学生名字 |
分类: 电脑技巧 |
以powerpoint2007为例,打开软件,将文件保存为*.pptm格式的文件。在”开发工具“选项中插入一个文本框控件,和两个命令按钮。文件本框命名为:TextBox1
命令按钮一个命名为”开始“,一个命名为"清除”。
1、双击“开始”按钮进入设置代码如下:
Dim a As Integer
Dim s As String
Dim c As Integer
s="刘德华郭富城张学友黎明
张国荣"
c=Len(s)
a-Int((c/3)*Rnd+1)
TextBox1.Text=Mid(s,3*(a-1)+1,3)
可将“s="后的内容改成自己需要的内容,注意三个字的不加空格,两个字的后面要加一空格。
2、双击结束按钮进入设置代码如下:
TextBox1.Text=""
这样就可以实现随机抽取姓名的功能。
实例 提取码:i3rh
前一篇:ppt中随机选择姓名(或题目)
后一篇:给html加个密码

加载中…