別のアプローチを取ることをお勧めします。いずれにせよ、TreeNode でドキュメントの 10000 文字またはすべての文字をユーザーに表示したくないので、ドキュメントとそのタイトルを格納する Name や Content などのプロパティを持つカスタム データ ストレージ クラスを作成します。コンテンツを Content プロパティに追加し、タイトルまたは意味のあるものを Name プロパティに追加してから、オブジェクトを TreeNode オブジェクトの Tag プロパティに追加します。
Dim mynode As New TreeNode
Dim SomeBigCustomObject as New MyContentStorageObject(name,content)
mynode.Text = SomeBigCustomObject.Name
mynode.Tag = SomeBigCustomObject
TreeView1.Nodes.Add(mynode)
次のように、ノードが選択されたときに (AfterSelect イベントを使用して) オブジェクトを取得できます。
dim ContentStorageObject As MyContentStorageObject = CType(e.Node.Tag, MyContentStorageObject)
dim content as string = ContentStorageObject.Content
テキストを編集する必要がある場合は、エディター ダイアログをポップアップするか、Content に保存されているデータをフォームのテキスト ボックスに送信して編集します。ユーザーは、ツリービュー ノード エディターにすべてを入力する必要がないことに感謝するでしょう。
これは非常に簡単で汚い説明ですが、本質は「.Tag プロパティを使用する」ことです。幸運を。