Question

VB中要通过button来改变文本框中字体的大小，颜色

新手，求大神指导。怎样写fontname,急求

Answer 1

Private Sub Command1_Click()
Text1.Font.Size = 40
Text1.ForeColor = &HFFFF&
Text1.Font = "微软雅黑"
Text1.Refresh
End Sub

Answer 2

Private Sub Command1_Click()
Text1.FontName = "黑体"
End Sub