。。在处理节点问题上,老蹦出这个问题。。烦晕了。 。虚心请教
Dim m_tempnode As TreeNode
Dim m_node As New TreeNode
If test() Then
m_tempnode = New TreeNode(node_text.Text, index, sindex)
m_node = TreeView1.SelectedNode.Parent
If m_node Is Nothing Then
TreeView1.Nodes.Add(m_tempnode)
node_text.Text = ""
index_text.Text = ""
sindex_text.Text = ""
Return
End If
Try
TreeView1.SelectedNode.Parent.Nodes.Add(m_tempnode)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.OKOnly, "树视图")
Return
End Try
node_text.Text = ""
index_text.Text = ""
sindex_text.Text = ""
Else
Return
End If
End Sub
执行时,到m_node = TreeView1.SelectedNode.Parent 这句上提示 未将对象引用设置到对象的实例
搞不懂了~~