在运行状态下,设置控件的 Font中的Name 及Size 属性就可以设置其字体名称及大小.如: Command1.Font.Name="宋体" Command1.Font.Size="30" Label.Font.Name = "楷体_GB2312" Label1.Font.Size = "30"
获取当前控件大小,获取修改后控件大小算出比值,字体大小乘以比值 Object.Font.Szie = Object.Font.Szie * 比值