vb中如何改变文本框中字体的类型
展开全部
先添加一个叫Microsoft Common Dialog Control 6.0的控件,然后代码如下:
CommonDialog1.CancelError = True
On Error GoTo errHandler
CommonDialog1.Flags = cdlCFBoth + cdlCFPrinterFonts
CommonDialog1.ShowFont
Text1.FontBold = CommonDialog1.FontBold
Text1.FontItalic = CommonDialog1.FontItalic
Text1.FontName = CommonDialog1.FontName
Text1.FontSize = CommonDialog1.FontSize
errHandler:
Exit Sub
CommonDialog1.CancelError = True
On Error GoTo errHandler
CommonDialog1.Flags = cdlCFBoth + cdlCFPrinterFonts
CommonDialog1.ShowFont
Text1.FontBold = CommonDialog1.FontBold
Text1.FontItalic = CommonDialog1.FontItalic
Text1.FontName = CommonDialog1.FontName
Text1.FontSize = CommonDialog1.FontSize
errHandler:
Exit Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
双引号要用英文的双引号。
引号中的名称要对应你电脑中安装的字体类型,比如有的电脑上是"楷体",有的电脑上则是"楷体_GB2312"
引号中的名称要对应你电脑中安装的字体类型,比如有的电脑上是"楷体",有的电脑上则是"楷体_GB2312"
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
text1.Font 这是文本框的字体属性, 给它赋值或者直接修改就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询