加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

在一个页面中让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

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有