窗体文字颜色和字体怎么修改

窗体文字颜色和字体如何修改
以下是一个窗体文字字体和颜色修改的代码，包含2个按钮和1个通用对话框

VB code

Private Sub Command1_Click()
CommonDialog1.Flags = &H3 Or &H100
CommonDialog1.ShowFont
Form1.FontSize = CommonDialog1.FontSize
Form1.FontBold = CommonDialog1.FontBold
Form1.FontItalic = CommonDialog1.FontItalic
Form1.FontStrikethru = CommonDialog1.FontStrikethru
Form1.FontUnderline = CommonDialog1.FontUnderline
Form1.ForeColor = CommonDialog1.Color
End Sub

Private Sub Command2_Click()
CommonDialog1.ShowColor
Form1.ForeColor = CommonDialog1.Color
End Sub

Private Sub Form_Click()
Print "这是一个VB字体和颜色测试框"
End Sub

但当单击窗口，出现文字"这是一个VB字体和颜色测试框"后；再点击字体按钮（command1),修改字体后，窗体中的文字却并没有修改字体；颜色按钮（command2）也是这个问题。
如果将文字放于文本框中，修改文本框的字体和颜色，就没有任何问题。
请大家帮我分析一下其中的原因。

------解决方案--------------------
"这是一个VB字体和颜色测试框"显示在窗体上，就叫‘窗体文字’了？

你要搞清楚什么是‘文字’，什么是‘图形’……

------解决方案--------------------
用Print 显示在窗体上的文字，是无法直接修改大小和颜色的
你可以考虑用Lable控件
或者每次改完颜色字体后，用Clear语句清除桌面文字，重新Print下
文字太多的话可以用背景色Print “■■■■”（类似橡皮擦效果）再重新Print文字

窗体文字颜色和字体怎么修改

相关推荐