如何将TextBox.text字体样式更改为斜体

Question

我有一个名为

tb_remarks

的文本框控件，尝试使用

 编写以 

tb_remarks

编写的文本

tb_remark.Font.Italic = True

但出现只读异常。

注意：我不想使用设计器更改控件的属性

Answer 1

使用

Font

-构造函数并将其分配给文本框：

Dim font = New Font(tb_remark.Font, FontStyle.Italic)
tb_remark.Font = font

通过传递旧的

Font

，您可以使用所有其他属性作为原型。

Answer 2

您应该根据 Control.Font Property 初始化字体的新样式并分配 italic-style:

Imports System.Drawing

tb_remarks.Font = New Font(Font, FontStyle.Italic)