VB.NET如何在不更改其他字体设置的情况下调整labeltext的大小

Question

我有一个带标签的设置屏幕，在这个屏幕中我也有一个fontdialog。

我想做的是以下内容：

我用对话框设置了字体，大小和其他设置。

在我的第二个屏幕上，我想要一个标签显示一些具有这些设置的tekst，但只有另一个尺寸。

我使用了以下代码：

Dim URLLabel As New Label
URLLabel.Text = Main.Label7Recieverinfo.Text
URLLabel.Name = "URL"
URLLabel.Font = My.Settings.TextFont
URLLabel.ForeColor = My.Settings.TextColor
URLLabel.BackColor = My.Settings.BackgroundColor
URLLabel.Dock = DockStyle.Top
URLLabel.TextAlign = ContentAlignment.MiddleCenter
URLLabel.AutoSize = False
URLLabel.Height = 70
PanelTransmit.Controls.Add(URLLabel)

我的问题是，标签正确显示我的字体，大小和颜色，但我如何使用My.settings.textfont中的字体和样式，但是在我的设置中没有更改它的另一个尺寸

抱歉我的英文不好

Answer 1

不是.net的专家 - 我主要在VB6工作，但这应该有用......

Dim fnt As Font

fnt = TextBox1.Font

TextBox1.Font = New Font(fnt.Name, 12, FontStyle.Bold)