以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何更改窗口在运行中某一个控件的字体?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177053)

--  作者:rongping
--  发布时间:2022/5/7 17:28:00
--  如何更改窗口在运行中某一个控件的字体?
设计了一个窗口其中有一些控件客户想改字体,请问如何写代码更改控件的字体?
--  作者:有点蓝
--  发布时间:2022/5/7 17:33:00
--  
http://www.foxtable.com/webhelp/topics/0722.htm

e.form.Controls("textbox1").Font = New Font("宋体",15)

--  作者:rongping
--  发布时间:2022/5/7 17:44:00
--  
以下是引用有点蓝在2022/5/7 17:33:00的发言:
http://www.foxtable.com/webhelp/topics/0722.htm

e.form.Controls("textbox1").Font = New Font("宋体",15)

再问一下,系统命令中有一个Syscmd.Table.ChangeFont()命令,这个可以引用到窗体的控件中的字体吗?这个怎么引用的?


--  作者:rongping
--  发布时间:2022/5/7 17:46:00
--  
以下是引用有点蓝在2022/5/7 17:33:00的发言:
http://www.foxtable.com/webhelp/topics/0722.htm

e.form.Controls("textbox1").Font = New Font("宋体",15)

还有这个字体New Font("宋体",15)中的"宋体"用变量通不过,怎么回事?


--  作者:有点蓝
--  发布时间:2022/5/7 17:47:00
--  
以下是引用rongping在2022/5/7 17:44:00的发言:

再问一下,系统命令中有一个Syscmd.Table.ChangeFont()命令,这个可以引用到窗体的控件中的字体吗?这个怎么引用的?

不能引用到窗体的控件
--  作者:有点蓝
--  发布时间:2022/5/7 17:48:00
--  
以下是引用rongping在2022/5/7 17:46:00的发言:

还有这个字体New Font("宋体",15)中的"宋体"用变量通不过,怎么回事?

怎么用的,代码呢!!!
--  作者:rongping
--  发布时间:2022/5/7 17:52:00
--  
以下是引用有点蓝在2022/5/7 17:48:00的发言:

怎么用的,代码呢!!!

e.form.Controls("textbox1").Font = New Font(字符串变量,数字变量)  这样就通不过


--  作者:狐狸爸爸
--  发布时间:2022/5/8 10:42:00
--  
我测试通过了啊:
e.Form.Controls("Label1").Font = New Font("宋体",16)

--  作者:有点蓝
--  发布时间:2022/5/8 20:51:00
--  
这样测试没有问题

Dim 字符串变量 As String = "宋体" 
Dim 数字变量 As Single = 12
e.Form.Controls("textbox1").Font = New Font(字符串变量, 数字变量)