调整动态创建的标签大小以适应其中的文本？

Question

我正在动态创建标签，然后动态添加文本（每次添加的文本数量都不同）。因此，标签需要始终与其中的文本宽度相同。

默认情况下，在Windows Designer中创建标签时会发生这种情况。但是在动态创建标签时，无论文本中包含多少文本，它都会以特定宽度“设置”（这意味着它通常会“切断”部分文本）。

那么......任何想法如何让动态创建的标签始终与其中的文本保持相同的宽度？

Answer 1

如果您想手动执行此操作，每次更改文本时都可以执行以下操作：

Dim g As Graphics = Label1.CreateGraphics()
Label1.Width = CInt(g.MeasureString(Label1.Text, Label1.Font).Width)

但是，简单地将标签的AutoSize属性设置为True并让标签为您工作更容易。

Label1.AutoSize = True