以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码设置字体样式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83507)
--  作者：jialihaha
--  发布时间：2016/4/11 12:05:00
--  代码设置字体样式

Dim fnt As New Font("宋体", 14, 0)
CurrentTable.Font = fnt

代码报错：重载决策失败，原因是没有可访问的“new”能够不经收缩转换即可被调用
--  作者：大红袍
--  发布时间：2016/4/11 12:08:00
--  
Dim f As  FontStyle = 0
Dim fnt As New Font("宋体", 14, f)
CurrentTable.Font = fnt