演练：使用 CheckBox 控件更改文档格式设置

本演练演示在 Microsoft Office Word 的文档级自定义项中，如何使用 Windows 窗体控件来更改文本格式。

**适用于：**本主题中的信息适用于 Word 2007 和 Word 2010 的文档级项目。有关更多信息，请参见按 Office 应用程序和项目类型提供的功能。

本演练阐释了以下任务：

• 设计时在文档级项目中向文档添加文本和控件。

• 选中选项时设置文本的格式。

若要查看完整示例，请参见 Office 开发示例和演练中的 Word 控件示例。

系统必备

您需要以下组件来完成本演练：

-

Visual Studio 2010 的一个版本，其中包含 Microsoft Office 开发工具。有关更多信息，请参见[将计算机配置为开发 Office 解决方案](bb398242\(v=vs.100\).md)。

• Word 2007 或 Word 2010。

创建项目

第一步是创建 Word 文档项目。

创建新项目

• 创建一个 Word 文档项目，并将其命名为“我的 Word 格式设置”。 在向导中，选择**“创建新文档”**。

  有关更多信息，请参见如何：在 Visual Studio 中创建 Office 项目。

  Visual Studio 将在设计器中打开新的 Word 文档，并将**“我的 Word 格式设置”项目添加到“解决方案资源管理器”**中。

将文本和控件添加到 Word 文档中

对于此演练，要在 Word 文档中添加三个复选框，并在 Bookmark 控件中添加一些文本。 这些复选框将向用户呈现用于设置文本格式的选项。

添加三个复选框

1. 验证文档是否已在 Visual Studio 设计器中打开。

2. 从**“工具箱”的“公共控件”**选项卡中，将第一个 CheckBox 控件拖到文档中。

3. 在**“属性”**窗口中，更改下列属性。

   Property	值
   名称	applyBoldFont
   Text	粗体

4. 按**“Enter”**将插入点移至第一个复选框下方。

5. 将第二个复选框添加到文档中 ApplyBoldFont 复选框的下方，并更改以下属性。

   Property	值
   名称	applyItalicFont
   Text	斜体

6. 按**“Enter”**将插入点移至第二个复选框的下方。

7. 将第三个复选框添加到文档中 ApplyItalicFont 复选框的下方，并更改以下属性。

   Property	值
   名称	applyUnderlineFont
   Text	Underline

添加文本和书签控件

1. 将插入点移至复选框控件的下方，并键入以下文本：

   单击一个复选框以更改此文本的格式设置。

2. 从**“工具箱”的“Word 控件”**选项卡中，将 Bookmark 控件拖动到文档中。

   将出现**“添加书签控件”**对话框。

3. 选择已添加到文档中的文本，然后单击**“确定”**。

   Bookmark 控件**“Bookmark1”**被添加到文档中的选定文本中。

4. 在**“属性”窗口中，将“(Name)”**属性更改为 fontText。

接下来，编写在选中或清除复选框时用于设置文本格式的代码。

选中或清除复选框时设置文本的格式

当用户选择格式设置选项时，将更改文档中文本的格式。

选中复选框时更改格式设置

1. 右击**“解决方案资源管理器”中的 ThisDocument，再单击快捷菜单上的“查看代码”**。

2. （仅适用于 C#）将下列常量添加到 ThisDocument 类。

   const int WordTrue = -1;
   const int WordFalse = 0;
   

3. 将以下代码添加到 applyBoldFont 复选框的 Click 事件处理程序中。

   Private Sub applyBoldFont_Click(ByVal sender As Object, ByVal e As System.EventArgs) _
       Handles applyBoldFont.Click
   
       Me.fontText.Bold = Me.applyBoldFont.Checked
   End Sub
   

   private void applyBoldFont_Click(object sender, System.EventArgs e)
   {
       if (this.applyBoldFont.Checked == true)
       {
           this.fontText.Bold = WordTrue;
       }
       else
       {
           this.fontText.Bold = WordFalse;
       }
   }
   

4. 将以下代码添加到 applyItalicFont 复选框的 Click 事件处理程序中。

   Private Sub applyItalicFont_Click(ByVal sender As Object, ByVal e As System.EventArgs) _
       Handles applyItalicFont.Click
   
       Me.fontText.Italic = Me.applyItalicFont.Checked
   End Sub
   

   private void applyItalicFont_Click(object sender, System.EventArgs e)
   {
       if (this.applyItalicFont.Checked == true)
       {
           this.fontText.Italic = WordTrue;
       }
       else
       {
           this.fontText.Italic = WordFalse;
       }
   }
   

5. 将以下代码添加到 applyUnderlineFont 复选框的 Click 事件处理程序中。

   Private Sub applyUnderlineFont_Click(ByVal sender As Object, ByVal e As System.EventArgs) _
       Handles applyUnderlineFont.Click
   
       If Me.applyUnderlineFont.Checked Then
           Me.fontText.Underline = Word.WdUnderline.wdUnderlineSingle
       Else
           Me.fontText.Underline = Word.WdUnderline.wdUnderlineNone
       End If
   End Sub
   

   private void applyUnderlineFont_Click(object sender, System.EventArgs e)
   {
       if (this.applyUnderlineFont.Checked == true)
       {
           this.fontText.Underline = Word.WdUnderline.wdUnderlineSingle;
       }
       else
       {
           this.fontText.Underline = Word.WdUnderline.wdUnderlineNone;
       }
   }
   

6. 在 C# 中，必须将文本框的事件处理程序添加到 Startup 事件。 有关如何创建事件处理程序的信息，请参见如何：在 Office 项目中创建事件处理程序。

   this.applyBoldFont.Click += new EventHandler(applyBoldFont_Click);
   this.applyItalicFont.Click += new EventHandler(applyItalicFont_Click);
   this.applyUnderlineFont.Click += new EventHandler(applyUnderlineFont_Click);
   

测试应用程序

现在，可以对文档进行测试，以验证选择或清除复选框时文本的格式设置是否正确。

测试文档

1. 按 F5 运行项目。

2. 选择或清除复选框。

3. 确认文本的格式设置正确。

后续步骤

本演练演示在 Word 文档中使用复选框以及以编程方式更改文本格式设置的基本操作。 以下是接下来可能要执行的一些任务：

• 使用按钮填充文本框。 有关更多信息，请参见演练：使用按钮在文档的文本框中显示文本。

• 使用单选按钮选择图表样式。 有关更多信息，请参见演练：使用单选按钮更新文档中的图表。

请参见

概念

使用 Word 的演练

NamedRange 控件

Office 文档上的 Windows 窗体控件的限制

其他资源

Office 开发示例和演练