VB.Net - FontDialog 控件

它提示用户从本地计算机上安装的字体中选择一种字体，并让用户选择字体、字体大小和颜色。它返回 Font 和 Color 对象。

以下是字体对话框 −

默认情况下，颜色组合框不显示在"字体"对话框中。您应该将 FontDialog 控件的 ShowColor 属性设置为 True。

FontDialog 控件的属性

以下是FontDialog控件的一些常用属性 −

序号	属性 &描述
1	AllowSimulations 获取或设置一个值，该值指示对话框是否允许图形设备接口 (GDI) 字体模拟。
2	AllowVectorFonts 获取或设置一个值，该值指示对话框是否允许选择矢量字体。
3	AllowVerticalFonts 获取或设置一个值，该值指示对话框是同时显示垂直和水平字体，还是仅显示水平字体。
4	Color 获取或设置选定的字体颜色。
5	FixedPitchOnly 获取或设置一个值，该值指示对话框是否只允许选择固定间距字体。
6	Font 获取或设置选定的字体。
7	FontMustExist 获取或设置一个值，该值指示如果用户尝试选择不存在的字体或样式，对话框是否指定错误条件。
8	MaxSize 获取或设置用户可以选择的最大磅值。
9	MinSize 获取或设置用户可以选择的最小磅值。
10	ScriptsOnly 获取或设置一个值，该值指示对话框是否允许选择所有非 OEM 和符号字符集以及 ANSI 字符集的字体。
11	ShowApply 获取或设置一个值，该值指示对话框是否包含Apply 按钮。
12	ShowColor 获取或设置一个值，该值指示对话框是否显示颜色选择。
13	ShowEffects 获取或设置一个值，该值指示对话框是否包含允许用户指定删除线、下划线和文本颜色选项的控件。
14	ShowHelp 获取或设置一个值，该值指示对话框是否显示"帮助"按钮。

FontDialog 控件的方法

以下是FontDialog控件的一些常用方法 −

序号	方法名称 & 描述
1	Reset 将所有选项重置为其默认值。
2	RunDialog 在派生类中重写时，指定公共对话框。
3	ShowDialog 使用默认所有者运行通用对话框。

序号

方法名称 & 描述

Reset

将所有选项重置为其默认值。

RunDialog

在派生类中重写时，指定公共对话框。

ShowDialog

使用默认所有者运行通用对话框。

FontDialog 控件的事件

以下是FontDialog控件的一些常用事件 −

序号	事件 & 描述
1	Apply 单击字体对话框上的"应用"按钮时发生。

示例

在此示例中，我们使用"字体"对话框更改富文本控件中文本的字体和颜色。采取以下步骤 −

将 RichTextBox 控件、Button 控件和 FontDialog 控件拖放到窗体上。
将按钮控件的 Text 属性设置为"更改字体"。
将 FontDialog 控件的 ShowColor 属性设置为 True。
双击Change Color按钮并修改Click事件的代码 −

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   If FontDialog1.ShowDialog <> Windows.Forms.DialogResult.Cancel Then
      RichTextBox1.ForeColor = FontDialog1.Color
      RichTextBox1.Font = FontDialog1.Font
   End If
End Sub

当使用 Microsoft Visual Studio 工具栏上的开始按钮编译并运行应用程序时，它将显示以下窗口 −