以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]控件字号依动态生成的字节多少而调整?[已解决]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60199)

--  作者:rophy0952
--  发布时间:2014/11/19 22:35:00
--  [求助]控件字号依动态生成的字节多少而调整?[已解决]
在窗口控件中,如果控件赋值的文本字节达到一定数量时,字号自动 调小,不知能否实现?
[此贴子已经被作者于2014-11-19 23:06:11编辑过]

--  作者:有点甜
--  发布时间:2014/11/19 22:38:00
--  

 你可以在textchanged事件判断 e.Sender.Text.Length 的大小,比如 超高10个字符,就重新设置文本框的字体

 

If e.Sender.Text.Length > 10 Then

    e.Sender.Font = New Font("宋体", 9)

End If

[此贴子已经被作者于2014-11-19 22:38:17编辑过]

--  作者:rophy0952
--  发布时间:2014/11/19 22:48:00
--  
是在窗口的textchanged事件判断吗?控件没有textchanged事件。在窗口的textchanged事件中录入代码,字号没有调整
--  作者:有点甜
--  发布时间:2014/11/19 22:50:00
--  

 控件的TextChanged事件

 

If e.Sender.Text.Length > 10 Then

    e.Sender.Font = New Font("宋体", 20)

End If