以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何自定义TreeView1的字号大小?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186559)

--  作者:lanbor
--  发布时间:2023/5/12 11:36:00
--  如何自定义TreeView1的字号大小?
请教专家:
如何自定义TreeView1的字号大小?
现有代码如下:
Dim tv2 As WinForm.TreeView = e.Form.Controls("TreeView1")
tv2.BuildTree("Product_Part_info", "Group_Name|prod_stru_name")
tv2.Nodes.Insert("配件清单", 0)
tv2.Nodes(0).Ic \'Home16.ico"
tv2.Nodes(0).ForeColor = Color.Blue
我想自定义“配件清单” 这几个字的字号再到16点,代码应该如何写?

先谢谢专家了!

--  作者:有点蓝
--  发布时间:2023/5/12 11:45:00
--  
只能设置整个目录树的字体:

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.Font = New Font("宋体", 16)