编写一个使用屏幕字体、字号的程序（VB）

在VB（Visual Basic）中，编写一个简单的程序来设置屏幕字体和字号可以使用Windows API函数。下面是一个基础示例，展示了如何使用`System.Windows.Forms.RichTextBox`控件来显示文本并设置其属性：

Imports System.Drawing.Text

Public Class MainForm
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' 创建RichTextBox控件，并设置字体和字号
        Dim richTextBox1 As New RichTextBox()
        Me.Controls.Add(richTextBox1)

        ' 设置字体
        Dim font As New Font("Arial", 14, FontStyle.Regular)
        richTextBox1.Font = font

        ' 设置文字
        richTextBox1.Text = "这是使用VB.NET设置的屏幕字体和字号。"
    End Sub
End Class

在这个例子中，我们创建了一个`RichTextBox`对象，然后设置了它的字体为Arial，大小为14点。你可以替换"Arial"和14为其他你喜欢的字体名和字号。