让Word XP“开口”讲笑话

    Word算得上是使用最广泛的应用软件了，但是如果你仅仅用它来打打字、画画表，那就太平淡无奇了，也有些委屈了Word。Word不仅有强大的文字编辑能力，它还内嵌一个VBA（Visual Basic for Applications）编程环境，可以开发出满足个性需求的功能来。

    本人利用VBA编写了一个“Word讲笑话”，做出来后颇有成就感，现将开发过程和心得写出来与读者朋友分享。

    能实现的功能是：当每次启动Word时将自动运行“Word讲笑话”，能随机的显示一条笑话（当然，笑话得事先录入好并保存在一个文本文件中）。“Word讲笑话”的面板中一共有三个按钮，点击“下一条”可继续阅读其它笑话，点击“关于”可显示作者和帮助信息，点击“关闭”将关闭窗口。面板中还有一个复选框，可以让用户自由决定下次启动Word时是否显示笑话。

    开发过程主要有以下几个环节（以Word XP为例）：

    一、建立窗体

    窗体是窗口和对话框的统称，它是Windows应用程序的用户界面的基础部分。窗体是控件的容器，用来放置文本框、命令按钮、复选框等各种控件。

    1、启动Word，单击菜单“工具→宏→Visual Basic编辑器”，也可以按快捷键[Alt+F11]，切换到Visual Basic编辑器窗凇?p>    2、单击菜单“插入→用户窗体”，系统建立一个默认样式的用户窗体。对窗体可拖动其右、下边的小方框来可改变大小，本例中根据功能需要将窗体拖为扁长形状。

    3、单击菜单“视图→属性窗口”，在属性窗口中修改窗体的几个主要属性值。在属性列表中选定“名称”属性，输入“Xiaohua”，然后选定“Caption”属性，输入“Word讲笑话”。现在，我们便能看到一个标题为“Word讲笑话”的窗体了。

    

    小提示：窗体中的点状物称为“网格”，它能在建立控件时起位置参考和智能对齐的作用，单击菜单“工具→选项”，选择“通用”选项卡，可修改网格的选项和网格块的大小，建议使用较小的网格设置，这样能使控件更靠近窗体边缘的位置，以达到美观的效果。

    二、建立控件

    建立了窗体就相当于打好了地基，下一步的工作就是“添砖加瓦”了，也就是建立控件。常用控件包括文本框、命令按钮、标签、复选框、滚动条等。建立控件的方法很简单，单击菜单“视图→工具箱”调出工具箱，在“工具箱”中选择控件类型，然后在窗体上单击或拖动即可。

    

    1、创建文本框：在“工具箱”中选择“AB

关键词：让Word XP“开口”讲笑话