vb字体恢复原状

[复制链接]
查看11 | 回复3 | 2009-4-29 18:06:52 | 显示全部楼层 |阅读模式
我用几个组合框分别用来设置文本框的字体大小\颜色\外观,但就是最后一步不知道该怎么做.
就是我改变了文本框中的字体大小和颜色还有外观,但有一个按钮的代码我不知道该怎么写,即按钮需要一按它字体就恢复到最初的状态,该怎么写啊,谢谢高手了.
而且如果只是让他变成原来那样,组合框里的那些选项还是选着的,并没有撤消,那不是很不好了吗,请高手进啊 .要的就是使我选择的步骤当没有一样回到开始啊
高手啊,你们在哪里?

回复

使用道具 举报

千问 | 2009-4-29 18:06:52 | 显示全部楼层
那你应该记下刚开始的时候文本框中字体的大小\颜色\外观的值,然后再编代码不就得了。...
回复

使用道具 举报

千问 | 2009-4-29 18:06:52 | 显示全部楼层
可以设置一个全局变量a:Dim a As Integer,把窗体运行时的字体赋给a:Private Sub Form_Load() a =(对象名).FontSize End Sub 然后就可以在放大缩小之后令fontsize=a使得字号变成原始字号了。...
回复

使用道具 举报

千问 | 2009-4-29 18:06:52 | 显示全部楼层
更高级?自动恢复么?用timer就可以了追求代码简洁也不用在这种地方斤斤计较啊~...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行