VB中修改输入文本的字体

来源：百度知道编辑：UC知道时间：2024/05/29 15:23:57

我学着用VB写了一个聊天程序，但是不知道怎么在程序运行时候，修改输入字体（象其他软件一样，可以自己定义输入的字体、颜色...）。
大侠们该怎么样实现，我已经定义一个按钮，打开字体对话框，但是选择以后，还是没用啊？

Private Sub Command1_Click()
CommonDialog1.ShowColor
Text1.ForeColor = CommonDialog1.Color
End Sub

通用对话框中的字体选择框有对应取得选取项的属性的你取得再赋与文件框的字体属性即可不可我很久没碰VB啦具体源码就不写啦你网上找一下吧