打开FontDialog并突出显示特定字体

Question

如果我打开标准保存文件对话框或打开文件对话框，我可以设置文件夹和文件类型的默认值。
有没有什么方法可以使用当前选择的字体调用字体对话框，它打开的高度是我选择的一个？换句话说，如果由于某种原因我想用Lucinda书法作为突出显示的字体打开那么它就是它当前选择的开放。

Answer 1

Private Sub button1_Click(sender As Object, e As System.EventArgs)
      Dim fontDialog1 As FontDialog = New FontDialog;
      fontDialog1.Font = new Font("Lucida Calligraphy", 10.0F)

      If fontDialog1.ShowDialog() <> DialogResult.Cancel Then
          textBox1.Font = fontDialog1.Font
          textBox1.ForeColor = fontDialog1.Color
      End If
  End Sub 'button1_Click