以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  目录树节点字体加粗  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=171526)
--  作者：cd_tdh
--  发布时间：2021/9/2 9:46:00
--  目录树节点字体加粗

老师，请问一下目录树节点字体加粗的样式是什么，值加粗一级节点的。

Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildTree("导航", "分组|名称","","序号")
For Each  nd As WinForm.TreeNode In tv.AllNodes
    If nd.Level = 0 Then
        nd.Ic
        nd.ForeColor = Color.red

。。。。。。。。。
--  作者：有点蓝
--  发布时间：2021/9/2 9:50:00
--  
没有办法，只能统一设置
--  作者：cd_tdh
--  发布时间：2021/9/3 14:45:00
--  

这样可以

\'一级节点字体加粗
Dim trv As object = e.Form.Controls("TreeView1").BaseControl
For i As Integer = 0 To trv.Nodes.count -1
    trv.nodes(i).NodeFont =  New Font("宋体", 10, FontStyle.Bold)
Next
--  作者：chnfo
--  发布时间：2021/9/3 20:47:00
--  
为什么要加粗？是为了让人醒目地看到现在选中的是哪一行？