![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
vb中怎么使text1字体变大缩小还原,用三个command按钮
3个回答
展开全部
Private Sub Command1_Click()
Text1.FontSize = Text1.FontSize + 1
End Sub
Private Sub Command2_Click()
Text1.FontSize = Text1.FontSize - 1
End Sub
Private Sub Command3_Click()
Text1.FontSize = 9
End Sub
Text1.FontSize = Text1.FontSize + 1
End Sub
Private Sub Command2_Click()
Text1.FontSize = Text1.FontSize - 1
End Sub
Private Sub Command3_Click()
Text1.FontSize = 9
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
![](https://ecmc.bdimg.com/public03/b4cb859ca634443212c22993b0c87088.png)
2024-10-22 广告
百事牛是共享提供商,我们提供可靠有效的服务,适当合理的授权费有利于的继续更新优化。同样的事情,同样的方法,百事牛团队十年磨一剑,始终至聚焦在密码恢复领域,深耕于此,我们已研制出有别于其他公司的算法和运算模式, 百事牛的暴力模式加入了分布式点...
点击进入详情页
本回答由百事牛提供
展开全部
可以设置一个全局变量a:Dim a As Integer,把窗体运行时的字体赋给a:Private Sub Form_Load() a =(对象名).FontSize End Sub 然后就可以在放大缩小之后令fontsize=a使得字号变成原始字号了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这么简单的,百度一大堆
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |