vb.net - 如何在不创建新字体的情况下更改字体大小

Question

是否可以在 .net winforms 中更改字体的大小而不必创建具有新大小的新字体？

Answer 1

你可以用 Extension 方法做这样的事情。

Imports System.Runtime.CompilerServices

Module FontExtensions

<Extension()> Public Function ToSize(ByVal OriginalFont As Font, ByVal NewSize As Single) As Font

        Dim NewFont As Font

        NewFont = New Font(OriginalFont.FontFamily, NewSize, OriginalFont.Style)

        Return NewFont

    End Function

End Module

然后这样称呼它......

SomeObject.Font = Font.ToSize(12)

它仍在幕后创建新字体，但您的应用程序代码不会因创建过程而困惑。