编程 每单机command1命令按钮一次文本中字体扩大1.2倍每单机缩小则缩小1.2倍文本内容为VB程序设计
1个回答
2014-12-15
展开全部
Private Sub Command1_Click() '放大
Text1.FontSize = 1.2 * Text1.FontSize
End Sub
Private Sub Command2_Click() '缩小
Text1.FontSize = Text1.FontSize / 1.2
End Sub
Private Sub Form_Load()
Text1.Text = "VB程序设计"
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询