Word如何添加控件和VBA脚本代码

Word程序通过添加控件和执行脚本语言来满足各类实际办公需要。这对于刚接触Word程序的用户而言，可能对Word控件的添加方法以及执行脚本的编写并不太了解。下面小编就与大家分享一下Word控件添加执行脚本的方法。

Word添加控件的方法

1打开Word程序，切换到“开发工具”功能区，点击“控件”栏目中相应的按钮。如图所示，小编选择“纯文本内容控件”按钮。

2接下来输入要显示的内容，点击“控件”面板中的“属性”按钮以打开“属性”面板，勾选“锁定”栏目中的“无法编辑内容”项，点击“确定”即可将此控件变成显示文本控件。

3接着我们再插入一个文本框“，点击”旧式控件“下拉列表，从中选择”文本框“，并从打开的“属性”窗口中，设置”名称“为”ID“，如图所示：

4接着点击”设计模式“按钮，将编辑界面切换到”控件“编辑模式，在此可以以可视化方式编辑控件。如图所示：

5点击”旧式控件“下拉列表，从中选择”选项控件“并插入到文档中，并在其”属性“窗口中，设置”名称“和”Caption“和”GroupName“，如图所示：

6利用同样的方法再插入一个”选项控件“，并在其”属性“面板中进行如图所示的设置。其中”GroupName“设置方法与前一控件相同，以实现二选一的功能。

7接着从”旧式控件“列表中插入一个”命令按钮“控件，并在其属性面板中进行如图所示的设置，设置其“名称”和“Caption”项。

END

Word控件添加脚本的方法

在Word“设计模式”下，双击“命令按钮”，将打开如图所示的“VBA编辑”界面，在此界面中，输入以下代码：Private Sub Hello_Click()Dim Name, sex As StringName = ID.ValueIf Man.Value = True Thensex = "男"Elsesex = "女"End IfMsgBox "您的百度ID号是：" + Name + " 性别：" + sex, vbDefaultButton1, "温馨提示"End Sub

2返回Word界面，关闭”设计模式“，输入ID并选择性别后，点击“信息显示”按钮，将弹出如图所示的窗口。此时表明控件及脚本正常运行。

使用代码高亮插件的步骤如下：

步骤一：下载插件和源代码：SyntaxHighlighter4Word.zip

步骤二：下载文件后，解压，然后双击binword2010Kong.SyntaxHighlighter.Word2010.vsto或binword2007Kong.SyntaxHighlighter.Word2007.vsto，即可完成安装，当然前提是你装了.net framework 4.0。安装成功后的提示如下：

步骤三：安装插件后，会在word中多一个功能区(支持word2007和word2010)：

步骤四：点击"设置"按钮，弹出设置界面：

步骤五：这里简化了配置，去掉了前一个版本中的一些设置。

步骤六：点击"插入代码"按钮，弹出如下界面：

步骤七：可以选择C#、Java、Xml、Javascript等多种语言。

步骤八：在word效果如下：

步骤九：发布到博客后的效果如下：

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using System.Windows.Forms;

using Kong.SyntaxHighlighter.Winform;

using Microsoft.Office.Tools.Ribbon;

namespace Kong.SyntaxHighlighter.Word

{

public partial class Ribbon1

{

private void Ribbon1_Load(object sender, RibbonUIEventArgs e)

{

}

步骤十：我在Word中生成这段代码的时候，用了ol和li，并且设置了ol以及li的style，这样在word中就可以显示边框以及交替行的颜色，同时给ol设了一个class=codeBlock，妄想在发布到博客后可以通过这个样式名codeBlock来自定义自己喜欢的样式。我在word中生成的代码大概是这个样子：

步骤十一：所以我们在博客中，不得设置所有ol的style，幸好博客园的文章都是在一个id为cnblogs_post_body的div下的，所以我在我博客中加了下面的style：

#cnblogs_post_body ol

{

border: 1px dotted #000066;

line-height: 150%;

word-break: break-word;

font-family: Consolas, Verdana !important;

border-radius: 5px;

width: 90%;

background-color: #E3E3FF;

list-style-position: outside;

margin-left: 0px;