蓝科溯源

    可通过“边框颜色”按钮选择所嵌入图片的边框颜色，还可通过滚动条调整所嵌入图片的大小。     其实，要将文字变成二维码有很多方法。简单的是从网上下一个二维码生成软件，安装在电脑或手机里，照着提示一步一步操作行；还有一些网页提供“在线生成二维码”的服务，也能做到。至于说自己将文本编码，手工绘制二维码，那对于99.9%的人（包括本人）都是做不到的！甭想了。     这个WORD版的二维码生成器，基本实现了VB6版的功能，但其所嵌图片的边框线条的宽度太小且无法调整，也不能显示圆角边框。有点遗憾，但自己的水平，也只能这样了。     约半年前，我当时刚开始琢磨二维码。，我去医院看病，医院给了一张缴费的发票，发票右上角印了一个条形码。我们是公费医疗，回来要去医务室报销。医务室规定：在医院看病的各项费用要记入医务室的病例中，这要求医务室的接诊医生要将发票上的项目手抄一遍。报销时，也要把发票上的费用信息手工键入电脑。为此，我建议医院把发票上的条码改成二维码，这样可以将发票中的所有信息全部包含在二维码中了。医务室的医生和报销核算人员只要用摄像头一扫，能代替手工抄写和手工键入的劳动，不但快捷，而且能确保信息的准确性。医院倒是答复说：建议很好，会转给有关方面。但至今仍是老样。     软件本来是用VB写的，word里的VBA也和VB差不多，实现移植应该不难。可动起手来，真是一步一个“坑”呀！VB6.0虽然几被淘汰，但它毕竟是编程语言；而WORD里的VBA，只是VB的一个“子集”，VB里的许多功能，VBA都没有。例如PICTURE这个图片控件，VBA不支持。可这个控件我是必须要用的，怎么办呢？     点击“生成二维码”按钮，将会将编辑好的文本转换成二维码图显示到下面右侧的图像框中（上图2）。     点击“粘贴到文档”按钮，此二维码图即被插入到文档中。效果见下图。

    4.要生成二维码的文本必须是纯文本，而且不能含有超级链接。     2.本word模板使用了word的“宏”功能，必须事先调整word的安全性级别。请将word的安全性级别修改为“中”。修改方法是：点击“工具”，在下拉菜单中的“宏”中，选择“安全性”并点击之，然后选择“安全级别”为“中”，并“确定”；

图4

    实际要使用它，还有几个问题：     那个在电脑上生成二维码的软件，虽然能够生成二维码，但却不能在二维码图片中嵌入图案，因此总觉得缺点什么。近又琢磨起这事，于是又花了点功夫，解决了嵌入图案的问题。比如，做一个包含个人通信录信息的二维码图，在图的中央放一张照片，不但看起来美观些，而且能表明该二维码与这张照片上的人有关，体现了个性化。不然，看那个二维码，都是乱糟糟的一团黑点子，谁是谁呀？     此路不通，只能绕道。受手机助手拷屏的启发，干脆将二维码图与照片两个图像框叠加后，通过屏幕拷贝获取叠加图，然后截去四周不用部分，仅留下带照片的二维码图不行了嘛。这些都是VBA能做到的。一试，还真的可以。于是，出现了现在这个WORD版的二维码生成器。           那些事确实不是我们的事！还是干我们该干的事吧！     另一件是：我去北京移动营业厅给手机充值。在自动充值机上完成操作后，给打印出一张纸。我还得将纸上打印的充值密码输入到手机里，才能完成充值。但自己年岁大了，那么长的密码数字，有时输好几遍都不成功。我想：自动充值机打印密码时，能不能同时打印一个二维码呢？我用手机一扫不行了嘛！给营业厅的工作人员一说，得到的回答却是：这个嘛，你给我们上级去说！碰了个不软不硬的钉子。     我把它做成了一个WORD模板，取名：“二维码模板.dot”。后缀是.dot（看清楚了：不是.doc）。双击“二维码模板.dot”模板文件，将新建一个空白的WORD文档。这个文档与原来的文档完全一样，可以像原来一样对它进行各种编辑操作。所不同的仅在于增加了生成二维码功能。用鼠标选定一段文本，按鼠标右键，在弹出的右键菜单的下面，多了一个“将选定文本生成二维码”的选项。点击它，将显示二维码编辑窗口。文档中的选中文本将显示到窗口上部的文本框中。（见下图1）。在这里，可以对该文本进行再次编辑（不会改变文档文字）。

#p#分页标题#e#

    欢迎有兴趣者使用本模板。有意使用此模板者，请联系我，或在留言中提供联系方式。

    不过，这种样子算不上“美”，甚至有点“醜”的图片，却给数码世界带来了巨大的影响。借助于智能手机的摄像头，商家可以传布他的产品信息，引导你上他的网页，关注并进而购买他的产品。对于普通老百姓来说，也可以通过二维码交换信息。比如，你想把你手机通信录里的某个人的信息传给另一个人，通过一个预先安装的二维码生成软件，把该人的信息先转成二维码（这是所谓的“电子名片”），对方用他的手机一扫完成了。比起写在纸上给他，或者通过短信、蓝牙给他，那可是方便多了。               图1                               图2                            图3

    二维码眼下可是一个时髦的词了！电视、报纸、杂志、广告、传单，到处都能看到那个“黑方块”，瞪着3只大“眼睛”，之间是乱七八糟的一团黑点子。有的中间还镶嵌了一个小图案加以美化。但不管怎么“打扮”，总也难以给人“美”的视觉感受！     约半年多前，我曾做过在电脑上生成二维码，和在手机上读取二维码的两个软件。手机软件是用JAVA写的，电脑软件是用VB6.0写的，还都能实现预想的功能。     二维码图总是被粘贴在被转换文本的旁边靠左，并成为文档的组成部分。可以用WORD的编辑功能对其进行操作。例如：放大、缩小、移动、修剪等。     1.因为每个人的电脑配置不同，WORD软件安装的程度不同，使用时可能会提示出错。使用者只能根据错误提示去解决。如果提示缺少某个文件，请从别的电脑拷贝或从网上下载，进行注册后，重新启动本模板；

    二维码的用途还远远没被开发出来，甚至还没被许多人所接受！说两件事：     自己对这个软件的效果还算满意。不过我想，如果能把它与我们常用的WORD结合起来，不是更好吗？     3.启动本模板后出现“安全警告”时，应选择“启用宏”。否则，将不会执行二维码生成功能；

    闲着也是闲着。不管二维码将来还会怎么用，但总得先有二维码才行。怎么将自己想传达的信息变成二维码呢？大多数人恐怕都束手无策。     点击“嵌入图片”，可从弹出的窗口选择要嵌入的图片文件，确定后，将在二维码图上叠加所选的图片（见上图3）。     原本是想将文字转成二维码，显示到图片框（Picture）中，再将一个照片（或图案）（用API）“画”到图片框中央，将图片框中的图保存到一个图片文件（.jpg）中。但VBA中只有图像框（Image），没有图片框。图像框无法使二维码图片与照片叠加，所以此路不通了！