这里有解决方法:http://www.foxtable.com/help/topics/2302.htm
代码很简单:
For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Level = 0 TYhen
nd.Text = md.Text & "年"
Elseif nd.Level = 1 then
nd.Text = md.Text & "年" End IfNext 多看帮助。