在 TabControl vb.net 中查找焦点文本框

Question

我正在尝试将 TabControl 添加到我的文本编辑器中。我只需要找出如何在选项卡控件中找到用户正在编辑的当前文本框，因此一个按钮将当前选定选项卡的文本更改为“Hello World”。该按钮不在选项卡控件内。

下面是我为标签控件添加新标签的代码，它在单击按钮时运行。

Dim tpTabs As New TabPage()
    Dim tbText = New TextBox()
    tpTabs.Name = "tpPage" & tcTabs.TabPages.Count + 1
    tbText.Name = "tbText" & tcTabs.TabPages.Count + 1
    tbText.Multiline = True
    tbText.Dock = DockStyle.Fill
    tbText.ScrollBars = ScrollBars.Both
    tpTabs.Text = "Untitled"

    tpTabs.Controls.Add(tbText)
    tcTabs.TabPages.Add(tpTabs)
    tcTabs.SelectedTab = tpTabs

所以每个标签都会打开一个新的文本框。新选项卡被称为“tpPage”，后面跟着一个数字，每次创建新选项卡时都会增加一，与文本框相同，“tbText”后面跟着一个数字，每次创建新选项卡时都会增加。

所以我希望我的按钮仅将当前打开的当前选项卡的文本更改为“Hello World！”，然后当我最终到达其他选项卡时。​​p>

感谢您的帮助，我已经尝试了很多方法，例如 TcTabs（这是表单上的选项卡控件）tcTabs.SelectedTab.tbText.Text = "Hello World!," 但我找不到解决方案。

Answer 1

CType(tcTabs.SelectedTab.Controls.Item(0), TextBox).Text = "Hello World"