我正在尝试将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!,"当我最终到达他们时,其他选项卡。
感谢任何帮助,我尝试了很多东西,比如TcTabs(表格上的标签控件)tcTabs.SelectedTab.tbText.Text =" Hello World!,"但我无法找到解决方案。
答案 0 :(得分:0)
CType(tcTabs.SelectedTab.Controls.Item(0),TextBox).Text =“Hello World”