在TreeNode标签中使用字典 - VB.NET

Question

我正在编写一些代码，我想填充一个TreeView，它做得非常成功，但我也希望在每个Level 1子节点的Tag中放一个Dictionary。一旦Tag被设置为Dictionary，我是否可以修改字典，而无需重新标记Tag。

For Each verse In Verses

    Dim _verse = verse.ToString.Trim
    Dim _node As TreeNode = New TreeNode(_verse.Split(vbNewLine).First & "...")
    _node.ToolTipText = _verse
    _node.Tag = New Dictionary(Of String, Object)
    Node.Nodes.Add(_node)

Next

Answer 1

稍后您可以将not的标记转换为Dictionary(Of String, Object)，然后像往常一样操作字典。

例如，假设currentNode是感兴趣的节点，您可以使用以下内容：

Dim dictionary as Dictionary(Of String, Object) = _
    CType(currentNode.Tag, Dictionary(Of String, Object))

dictionary.Add("NewKey", newObject);