使另一种形式的标签字体变小答案

【问题标题】：Make the font size of label in another form smaller使另一种形式的标签字体变小
【发布时间】：2013-03-28 21:31:58
【问题描述】：

我正在使用两个forms，当我单击第一个form FormSales 中的按钮时，我想在label 上显示text“非库存价格”并降低fontsize的publicformFormNumberpad。我的代码是，

Private Sub btnItemNonTaxable_Click(ByVal sender As Object, ByVal e As EventArgs) _
                                    Handles btnItemNonTaxable.Click
    chktax1.Checked = False
    _AmountTitle = "Non Inventory Taxable Price"
    Dim fnt as Font
    fnt = FormNumberPad.lblTitle.Font
    FormNumberPad.lblTitle.Font = New Font(fnt.Name, 12, FontStyle.Bold)
    Dim numberpad As New FormNumberPad
    numberpad.ShowDialog()

    ..............
    ..............
End Sub

字体大小没有变小，我该如何做到这一点？

【问题讨论】：

标签： vb.net winforms font-size

【解决方案1】：

这里

Dim numberpad As New FormNumberPad
numberpad.ShowDialog()

您正在创建一个新的 FormNumberPad 实例，该实例使用 ShowDialog() 显示。
ShowDialog 是模态的，这意味着在您关闭显示的表单之前它不会返回。
此时您的标签（仍然存在于内存中）被隐藏，您看不到任何变化。

您可以尝试在显示对话框之前更改标签，但在当前表单实例（数字键盘）上，而不是在作为对话框类定义的 FormNumberPad 上。

Dim numberpad As New FormNumberPad
fnt = numberpad .lblTitle.Font
numberpad.lblTitle.Font = New Font(fnt.Name, 12, FontStyle.Bold)
numberpad.ShowDialog()

【讨论】：

如果您想在运行时更改字体，这是最好的方法。

【解决方案2】：

这是因为您使用的是“新”FormNumberPad，请将该行及以下更改为 FormNumberPad.ShowDialog()

【讨论】：