vb统一文本字体的大小

来源：百度知道 编辑：UC知道 时间：2024/05/18 09:47:26
就是统一窗体里所有文本字体的大小,不想一个一个去设置,请问要写什么代码.
达人指点
谢谢!

可以在启动的时候遍历一下文本框

Dim Txt As Control

For Each Txt In Form1
If LCase(TypeName(Txt)) = "textbox" Then
Txt.Font.Size = 16 '字体的大小

End If
Next

在一开始建窗体的时候就将窗体属性里的字体设好，然后再将控件拖放到窗体上时，都按窗体设置的大小默认