主题：还是动态控件字体属性动态赋值问题

                    Dim fnt As New Font("宋体",dr("_FontSize"),FontStyle.Regular)
                    ctl_Label.Font = fnt

                     如何将数据库中存储的数据赋值给上式中“字体”，“大小”，“样式”

 

dr（“样式”）的内容是“regular”，还是“fontstyle.regular”，还是“0” ？

此主题相关图片如下：qq截图20150107164545.png

 “Dim fnt As New Font(dr("_FontName"),dr("_FontSize"),[Enum].Parse(Gettype(FontStyle), dr("_FontStyle")))
 ctl_Label.Font = fnt”

上述代码报错如上图

Dim fnt As New Font("宋体",dr("_FontSize"),0)
ctl_Label.Font = fnt

此主题相关图片如下：qq截图2015-2.png

“Dim fnt As New Font("宋体",dr("_FontSize"),FontStyle.Regular)”

只有上述这个可以通过，就是字大小可以调用数据库数据，一旦字体和样式调用数据库数据就出错，我的数据库中字体为字符型，样式为微整型

此主题相关图片如下：qq截图2015-3.png

那么字体名称呢，是不是 dim fname as font.name =dr（_fontname）

因为我数据库里面是字典，包括‘宋体’这个选择，那么直接调用dr（"_fontname"）也有问题

谢谢