以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何改变所有字体大小  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89976)

--  作者:gpmlimeng
--  发布时间:2016/9/2 12:02:00
--  [求助]如何改变所有字体大小

如何用一段代码改变所有窗口和表字体大小


--  作者:有点蓝
--  发布时间:2016/9/2 14:12:00
--  
窗口只有打开,才能改变,关闭就无效。
只能在afterload事件遍历所有控件,设置其字体,比如

For Each c As Winform.Control In e.Form.Controls
    c.Font = New Font("黑体",12,FontStyle.Underline)
Next


表这样
For Each t As Table In Tables
    t.Font = New Font("黑体",12,FontStyle.Underline)
Next