YZ系列工具之YZ09：VBA_Excel之读心术

我给VBA下的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的工作效率，而且可以提高数据的准确度。我的教程一共九套+一部VBA手册，教程分为初级、中级、高级三大部分。是对VBA的系统讲解，从简单的入门，到数据库，到字典，到高级的网抓及类的应用；手册是为方便编程人员查找案例编写的。

对于初级及中级的学员，很想看到VBA的利用价值。也是对自己知识点的整合。我推出的YZ系列工具，可以让这个阶段的学员感受到VBA之强大。坚定自己学习VBA的决心。VBA工具共两个系列，一个是YZ系列，一个是NZ系列。YZ系列比较简单些，实用性强，可以在自己的工作中方方面面都可以利用到,今日给大家介绍的是YZ系列工具之YZ09：VBA_Excel之读心术

【分享成果，随喜正能量】每个喝茶的人，大概都渴望拥有一间茶室，经书日月，粉黛春秋…，最终归至，一隅，一席，一茶，静静品之，娓娓道之平和，且宽容 。

YZ09 VBA_Excel之读心术

这个应用给大家以玄学的感觉，其实不是，这是VBA通过EXCEL来读懂你心所想的一种应用。

1. 你此时默念一个两位数字，不必言明；
2. 点击魔法球。程序运行，正对旋转的魔法球；
3. 大概是几秒钟，球停止转动；
4. 魔法球根据测到的反馈开始计算，大概是1秒钟；
5. 魔法球给出自己计算并根据右侧的“数字-图形”密码本给出图形结果。

准确率为百分之百。

本应用中的知识点：① VBA如何驱动魔法球旋转 ②如何显示运行结果的图片 ③如何给出展示图片的展示效果（1秒钟） ④如何取得系列的图片 ⑤ 如何给图片随机排列 ⑥如何随机取得图片 ⑦ 形状如何隐藏及显示 ⑧ 全屏的设置 ⑨ 隐藏滚动条的设置

这个应用的程序文件是：VBA_Excel之读心术.xlsm，VBE密码是“123456789”.

一 魔法球运行前的准备

我们打开这个工具，会有下面的界面出现，中间是一个巨大的魔法球，魔法球中心能量聚集区域发出幽幽的蓝光，仿佛在解读着这个世界。在魔法球的表明有着千丝万缕的能量线，这些能量线保护着魔法球的能量。

此时需要你正对着魔法球，任意选择的两位数字。根据魔法球右下角提示栏的口诀，在右侧的“数字—图片”密码本中找到对应的图片。（这个口诀非常重要，比如你选择的两位数是82，那么根据口诀：82-(8+2)=72,返回的将是密码本中72所对应的图形）。

记住你自己的选择。

二 VBA驱动魔法球

我们在魔法球上任意点击，会有下面的提示：

我们点击“是”，然后魔法球开始转动，施展自己的魔法，测试你刚才所想的数字。

三 反馈测试的结果

魔法球测试运算的时间基本是1秒钟，然后给出测试的结果：

此时验证你自己所想的图片，看看是否是测试结果中魔法球能量核心显示的图片。如果是，我们点击弹出对话框的“是”按钮。

以上告诫世人：佛法无边，六字真言给大家以福报安康。

以上就是效果的测试，当然这个应用的利用价值还是非常大的，大家可以利用到自己的程序中。

【分享成果，随喜正能量】

• 为了无分别，以上代码不便公开，如需要，可以私信我