| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 字体与字符串的转换 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=81783) |
| -- 作者：cyl123 -- 发布时间：2016/3/5 19:43:00 -- 字体与字符串的转换 字体转字符串如下: Dim fnt As New Font("黑体",12,FontStyle.Underline) output.show(fnt.ToString()) 字符串如何转回字体呢？ |
| -- 作者：cyl123 -- 发布时间：2016/3/6 10:30:00 -- up |
| -- 作者：大红袍 -- 发布时间：2016/3/6 10:42:00 -- Dim fnt As New Font("黑体",12,FontStyle.Underline) output.show(fnt.name)
参考 https://msdn.microsoft.com/zh-cn/library/system.drawing.font.aspx
|
| -- 作者：cyl123 -- 发布时间：2016/3/6 14:30:00 -- Dim fnt As New Font("宋体",15,FontStyle.Bold Or FontStyle.Underline ) Dim str As String=fnt.tostring output.show(fnt.tostring) 输出为:[Font: Name=宋体, Size=15, Units=3, GdiCharSet=1, GdiVerticalFont=False] 如何将:[Font: Name=宋体, Size=15, Units=3, GdiCharSet=1, GdiVerticalFont=False]转换为 font呢
|
| -- 作者：fjlclxj -- 发布时间：2016/3/6 16:50:00 -- 如下 Dim fnt As New Font("宋体",18,FontStyle.Bold Or FontStyle.Underline) Dim cvt = new FontConverter() Dim s As String = cvt.ConvertToString(fnt) fnt= cvt.ConvertFromString(s) e.Form.Controls("Label2").Font = fnt |
| -- 作者：cyl123 -- 发布时间：2016/3/6 20:46:00 -- 测试了colorConverter() 也可以用 ，类似FontConverter() 都还有哪些可以用呢？ |
| -- 作者：cyl123 -- 发布时间：2016/3/6 20:50:00 -- TextAlign 设置标签文本的对齐方式，ContentAlignment型枚举 TextAlign能否通过字符串转换？ |
| -- 作者：大红袍 -- 发布时间：2016/3/6 20:55:00 -- 枚举，就是1、2、3这样的值，你msgbox弹出看一下就好。 |
| -- 作者：cyl123 -- 发布时间：2016/3/6 21:22:00 -- 如何通过1,2,3 对abc.TextAlign赋值呢？ 不通过abc.TextAlign=ContentAlignment.xxx 赋值
|
| -- 作者：大红袍 -- 发布时间：2016/3/6 21:34:00 -- 弹出来看各个值不就行了？
msgbox(ContentAlignment.BottomCenter）
保存的时候，也保存为数值。 |