无法从选定选项卡中获取 RichTextBox

Question

我的程序快完成了，它是一个多标签的记事本，我无法开始保存活动标签的 RichTextBox。

Screenshot

第一个选项卡有一个名为“BLACKTEXT”的 RichTextBox，但其他选项卡是通过单击“新建”动态创建的。

new tab + new rtb (picture)

点击'Save'时，必须保存SelectedTab的RichTextBox。 我在 Google 中尝试了很多答案。 ~~我会授予您为我修复它的选项（[下载 here.rar][3]）并return它还给我，~~ 因为我已经一个星期以来，我日夜兼程，越来越沮丧，我们将不胜感激。

谢谢，链接

Answer 1

此代码将从 TabControl1 的当前选择的 TabPage 中获取唯一的 RichTextBox 控件：

Dim selectedRichTextBox = TableControl1.SelectedTab.
                                        Controls.
                                        OfType(Of RichTextBox)().
                                        Single()

Answer 2

我无法为您修复它，但也许我可以提供帮助。是要保存richtextbox控件还是richtextbox控件的内容？如果要保存的是richttextbox控件的内容，使用RichTextBox的.rtf属性，在要创建的文件上写：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    With SaveFileDialog1
        If .ShowDialog() = Windows.Forms.DialogResult.OK Then
            Call SaveRTF(.FileName)
        End If
    End With
End Sub

Private Sub SaveRTF(ByVal pSelectedPath As String)
    Dim newFile As String = pSelectedPath & ".rtf"
    File.AppendAllText(newFile, RichTextBox1.Rtf)
End Sub

无法从选定选项卡中获取 RichTextBox

Impossible to get the RichTextBox from the Selected Tab

vb.net

save

richtextbox

savefiledialog