Question

我在下面使用的代码不起作用，我对vb.net很有经验，之前从未遇到过这个问题，标签只是在表单加载时才出现（代码在Load事件中）处理程序）。

Dim currentUserLabel As New Label 
    With {.Text = "Logged in as: " + firstName + " " + _ lastName, 
    .Location = New Point(5, 3), .Font = New Font("Microsoft Sans Serif", 
    18, FontStyle.Bold)}
MenuTab.Controls.Add(currentUserLabel)
currentUserLabel.AutoSize = True
currentUserLabel.BringToFront()
MenuTab.Refresh()

Answer 1

您无法将控件添加到TabControl，只是它的页面。

 Dim currentUserLabel As New Label With {.Text = "Logged in as: " + firstName + " " + _ lastName,
 .Location = New Point(5, 3), .Font = New Font("Microsoft Sans Serif", 18, FontStyle.Bold)}
 MenuTab.TabPages(0).Controls.Add(currentUserLabel)
 currentUserLabel.AutoSize = True

Answer 2

最后对它进行排序，我在加载表单时使标签无效，然后创建了一个处理标签失效的事件方法。我使用了我在这种方法中尝试过的代码并且它有效。不知道为什么它不会只是在加载表单时加载标签文本：P。 VB有时是愚蠢的......

我想使用vb.net为表单添加新标签

2 个答案: