如何在PowerPoint中实现随机抽取手机号

在PowerPoint中利用控件工具，实现抽取手机号，抽取幸运者手机号，中奖者手机号。下面介绍具体操作过程。

操作方法

  • 01

    在文件夹内新建一个PowerPoint文件。如图

  • 02

    打开PowerPoint，依次点开工具——自定义，打开自定义对话框，在工具栏内勾选 控件工具箱，调出控件工具箱。如图

  • 03

    在控件工具箱内，点选文本框工具，在PPT中按住鼠标左键画出一个文本框。如图

  • 04

    再在控件工具箱内，点选按钮工具，在PPT中按住鼠标左键画出两个按钮。如图

  • 05

    点击第一个按钮，并单击鼠标右键，打开按钮属性框。修改Caption属性，即显示的按钮名称，并且可以对其显示字体、字体大小进行设置。如图

  • 06

    双击第一个按钮即 抽取 按钮，在弹出的代码编辑框中输入以下代码： Dim a As Integer Dim s As String Dim c As Integer s = "1380000111113800002222138000033331380000444413800005555 " c = Len(s) a = Int(((c / 11) * Rnd) + 1) TextBox1.Text = Mid(s, 11 * (a - 1) + 1, 11) 期中，1380000****即为要抽取的手机号，手机号之间不要有空格。最后保存。如图

  • 07

    点击第二个按钮，并单击鼠标右键，打开按钮属性框。修改Caption属性，即显示的按钮名称，并且可以对其显示字体、字体大小进行设置。如图

  • 08

    双击第二个按钮即 清空 按钮，在弹出的代码编辑框中输入以下代码： TextBox1.Text = "" "" 为英文输入状态。最后保存，关闭代码编辑页面。如图

  • 09

    点击文本框，可以对文本框手机号码字体、字体大小进行修改。按上述方法打开文本框属性框。如图

  • 10

    做完以上步骤，保存PPT。放映PPT测试。抽取后，可执行清空后再抽取。如图

赞 (0)

相关推荐

  • 如何在PowerPoint中插入表格

    PPT制作教程：如何在PowerPoint中插入表格 首先启动PowerPoint软件，单击Powerpoint“插入”菜单中的“对象”命令，打开“插入对象”对话框，选择“Microsoft Word ...

  • 如何在PowerPoint中加入背景音乐

    如何在PowerPoint中加入背景音乐[PPT中加入背景音乐技巧] ①首先,选择PPT第一个页面,然后单击菜单栏的"插入"中的"影片和声音",在弹出的菜单中再 ...

  • 如何在PowerPoint中下载并使用模板

    如何在PowerPoint中下载并使用模板

    我们在使用ppt软件的时候,可以选择将其中的模板下载下来,进行使用,今天就跟大家介绍一下如何在PowerPoint中下载并使用模板的具体操作步骤.1. 首先打开电脑,找到桌面上的PPT软件,双击打开, ...

  • 如何在PowerPoint中插入同步显示的Excel文件

    有时在演示PPT文档时,需要调用Excel表中的数据展示出来,并且数据的更新,不影响PPT中展示的数据,即使数据修改了,也不需要另做PPT.下面介绍如何在PowerPoint中插入同步显示的Excel ...

  • 如何在powerpoint中插入倒计时功能

    如何在powerpoint中插入倒计时功能,这里给大家介绍一下: 操作方法 01 双击powerpoint桌面图标: 02 单击工具,宏,安全性: 03 单击低:确定: 04 单击工具,加载宏: 05 ...

  • 如何在PowerPoint中插入视频

    如何在PowerPoint中插入视频呢?下面小编来教大家. 操作方法 01 首先,我们打开我们的电脑,然后我们打开我们电脑上面的ppt,之后我们点击插入: 02 弹出的界面,我们点击视频下方的下拉箭头 ...

  • 如何在PowerPoint中插入(使用)条形码

    关于如何在PowerPoint中插入条形码,可能使用的范围不广,很少有人问起这个问题,但是在此本人亦做一下说明 首先保证:你所安装的PowerPoint软件属于完全安装,如果是只安装了部分功能,那么很 ...

  • 如何在Powerpoint中插入FLV视频

    　FLV视频全称是flash video，它与Flash不一样，所用的播放器也不一样。为了提升课堂效果，我们在制作课件时，经常会从网上下载各种资源来丰富课件内容。大部分都是FLV格式的视频文件，但很多 ...

  • 如何在PowerPoint 中插入视频

    为追求更完美效果，在Powerpoint中通过shockwave Flash Object控件插入SWF格式动画已是家常便饭。但很多情况下，演示文档还需要视频做辅助，下面我们介绍在PowerPoint ...