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

新手,求大神指导。怎样写fontname,急求
2025-05-09 23:42:05
推荐回答(2个)
回答1:

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

回答2:

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