Question

vb里用一个单选按钮怎么使文本框中字体变

Answer 1

Private Sub Option1_Click()
Text1.FontName = "宋体"
End Sub

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

Private Sub Option3_Click()
Text1.FontName = "楷体"
End Sub