| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 文本框字体大小问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=70857) |
| -- 作者：lzzhx -- 发布时间：2015/6/30 12:01:00 -- 文本框字体大小问题 请问可以在代码中动态设置文本框的字体大小吗？若能设置，请教如何设置。 |
| -- 作者：Bin -- 发布时间：2015/6/30 12:02:00 -- 设置它的Font属性即可 http://www.foxtable.com/help/topics/0494.htm |
| -- 作者：大红袍 -- 发布时间：2015/6/30 12:03:00 -- e.Form.Controls("TextBox1").Font = New Font("宋体", 20) |
| -- 作者：lzzhx -- 发布时间：2015/6/30 12:06:00 -- 谢谢二位老师，再问一个问题，如何判断文本框中的字符充满了文本框，然后改变字体大小？ |
| -- 作者：大红袍 -- 发布时间：2015/6/30 12:12:00 -- 这个判断不了。
如果要判断，可以参考
Dim gc As Graphics = basemainform.CreateGraphics()
Dim size As SizeF = gc.MeasureString("12345678" , basemainform.Font)
msgbox(size.width)
msgbox(size.height) |
| -- 作者：lzzhx -- 发布时间：2015/6/30 12:32:00 -- 谢谢老师，我试试看 |
| -- 作者：lzzhx -- 发布时间：2015/6/30 13:02:00 -- 老师，可以这样判断并实现自动设置字体大小，多谢！ |