1. 可以先创建2个命令按钮
2. 把第一格命令按钮command1的caption属性改为“黑体”,把第二个命令按钮command2的caption属性改为“宋体”
3.
Private Sub Command1_Click()
text1.text="黑体"
End Sub
Private Sub Command2_Click()
text2.text=“宋体”
End Sub
这样应该可以的,楼主你可以试试。。。
caption不是字体,是标签内容
字体是Font
你说的啥意思 ,没看明白
再详细说说
Private Sub Command1_Click()
Label1.FontName = "微软雅黑"
End Sub
Private Sub Command2_Click()
Label1.FontName = "幼圆"
End Sub
Private Sub Command3_Click()
Label1.FontName = "宋体"
End Sub