- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 老师我二种写法都报错，应该怎么写才对？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154587)
-- 发布时间：2020/9/19 14:01:00
-- 老师我二种写法都报错，应该怎么写才对？
Dim fnt As New Font(Tables("系统设置").Current("默认字体"),Tables("打印设置").Current("表体字体大小"))
rt.Style.Font=fnt
rt.Style.Font=New Font(Tables("系统设置").Current("默认字体"),Tables("打印设置").Current("表体字体大小"))
-- 发布时间：2020/9/19 14:21:00
--
提示什么错误？单元格存储的是什么值？
-- 发布时间：2020/9/19 14:26:00
--
在编辑辑里一点确定，就提示未知错误，把这句注释掉就好了
-- 发布时间：2020/9/19 14:37:00
--
把项目复制到其它目录打开，注意路径不要有括号等特殊字符。然后看提示的真正错误
-- 发布时间：2020/9/19 14:49:00
--
此主题相关图片如下：1.png
这是错误提示，应该怎么转换？
[此贴子已经被作者于2020/9/19 14:48:58编辑过]
-- 发布时间：2020/9/19 15:01:00
--
参数类型不对
Dim fnt As New Font(cstr(Tables("系统设置").Current("默认字体")),CSng(Tables("打印设置").Current("表体字体大小")))