| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何返回字体样式与改变样式？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87907) |
| -- 作者：hui986 -- 发布时间：2016/7/22 12:01:00 -- [求助]如何返回字体样式与改变样式？
假设，字体样式为【("宋体",12,FontStyle.Bold or FontStyle.Underline)】 请问我如何检测字体包含【FontStyle.Bold 】并取消这个样式
我用代码返回FontStyle型枚举，返回是数字
【如下是帮助部份内容】 例如定义一个黑体、大小为12磅、带下划线的字体： Dim fnt As New Font("黑体",12,FontStyle.Underline)样式可以用Or运算符叠加，例如定义一个宋体、大小为12磅、加粗且带下划线的字体： Dim fnt As New Font("宋体",12,FontStyle.Bold or FontStyle.Underline)字体包括下面三个属性： Name: 返回字体名称。 |
| -- 作者：狐狸爸爸 -- 发布时间：2016/7/22 12:39:00 -- Dim fnt As New Font("宋体",12,FontStyle.Bold Or FontStyle.Underline)
|
| -- 作者：hui986 -- 发布时间：2016/7/22 12:56:00 -- 懂了，谢谢，狐爸！ [此贴子已经被作者于2016/7/22 13:02:19编辑过]
|
| -- 作者：hui986 -- 发布时间：2016/7/22 13:13:00 -- 狐爸，你好！ 我正在做富文本，已经能正常检测了， 如何删除指定的其中一个【样式】 （注：要保留其它原有的样式） |
| -- 作者：大红袍 -- 发布时间：2016/7/22 13:19:00 -- 比如
Dim c As WinForm.Control = e.Form.Controls("TextBox1") c.Font = New Font(c.font.Name, c.font.Size, (not FontStyle.Bold) And c.font.Style) |
| -- 作者：hui986 -- 发布时间：2016/7/22 13:27:00 -- 谢谢袍哥，明白！ |