VB.NET So ändern Sie die Größe von labeltext, ohne die anderen Schrifteinstellungen zu ändern

Question

Ich habe einen Einstellungsbildschirm mit einem Label und auf diesem Bildschirm habe ich auch einen Fontdialog.

Was ich versuche, ist das zu tun folgendes:

ich meine Schrift gesetzt, Größe und andere Einstellungen mit meinem Dialog.

Auf meinem zweiten Bildschirm möchte ich ein Etikett zeigen einige Tekst mit diesen Einstellungen aber nur eine andere Größe.

habe ich den folgenden Code:

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) 

Mein Problem ist, zeigt das Etikett meine Schriftart, Größe und Farbe richtig, aber wie kann ich die Schriftart und Stil von My.settings.textfont verwenden, aber mit einer anderen Größe

sorry für mein schlechtes Englisch

Answer 1

kein Experte in .net, ohne es in meinen Einstellungen zu ändern - ich meist in VB6 arbeiten, aber dies sollte funktionieren ...

Dim fnt As Font 

fnt = TextBox1.Font 

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