在vb.net中动态更改应用程序的字体

Question

我们有一个基于VB.net的内部应用程序。用户已请求一个选项，他可以动态更改应用程序中所有控件的字体。 能不能让我知道如何实现这一目标。

Answer 1

使用此：

    Dim ctrl As Control
    For Each ctrl In Me.Controls
        ctrl.Font = New Font("Arial", 30)
    Next

您可以编写用户选择的所需文本框

，而不是arial