2016-03-30 31 views
0

我有一個帶有標籤的設置屏幕,在此屏幕中我還有一個fontdialog。VB.NET如何在不更改其他字體設置的情況下調整labeltext的大小

我想要做的是以下幾點:

設置我的字體,大小,與我對話的其他設置。

在我的第二個屏幕上,我想要一個標籤顯示一些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但與其他尺寸沒有.NET改變它在我的設置

對不起我的英文不好

+1

'URLLabel.Font = New Font(My.Settings.TextFont.FontFamily,new_size,My.Settings.TextFont.Style)'? – GSerg

+0

'URLLabel.Font = My.Settings.TextFont.Size + 4'也許? –

+0

保重。字體和標籤是IDisposable – Plutonix

回答

0

不是專家 - 我主要是在VB6工作,但這應該工作...

Dim fnt As Font 

fnt = TextBox1.Font 

TextBox1.Font = New Font(fnt.Name, 12, FontStyle.Bold) 
相關問題